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GENERAL - 


This product specification wilt jesceibe the basic components anc 
operators of the B1890/B17C0 SOL S-Language» including its STACK 
MECHANISM» DATA DESCRIPTORS» and CQOE and DATA ADDRESSES. After 
a preliginary discusston of the structure and operation of the. 
S“Machines its operators will te explained in detail. 


“RELATED PUBLICATIONS 


HAKE 7 eo NUMBER: 


“SDL/UPL COMPILER Bas. 2212 «5389 
81600/81700 SOL (BNF VERSION) =—sPa Se 2212 5405. 
B1890/B81700 SYSTEMS REFERENCE MANUAL = #1057155 


“gueravons coronation = cwPANY conrtocTIM, 


| COMPUTER SYSTEMS. Group ee ee 81800/81700 | SOL S-LANGUAGE © 
baicips BARBARA BEANE ee OU oe ae ene oa. PeEOR 2389 ha eee 


secs ae IME ScMACHINE 


the sou s- Machine cfs comoned of the fottovion taste ehenntes 


ce 


Base-linit area. 


This” is the memory area ‘for progran ideeas “Tt We? akner * 
only area that is directly addressable and thus modi- 
fiable by SOL S-ops. This area is bounded by base and 


Limit registers. Att “absolute” data addresses in: the. 


Ssmachine are expressed as a bit offset from the base | 


register. For addresses to be absolute in fact» a 


programs base register must be zeroe The area is. 
broken into two divisionss static memory (from base _ 


register to dynamic. memory base) which is _ occuried by 
the SDL stacks» and dynamic memory (from dynamic Menor y 
base to the Limit register) which is used for virtuat. 


data memory» ieee» SDL ae array page tables ana” s 
resident pages. | of | | | 


. Run stucture nucteus 


‘This contains information used by the MCP and SOL 


interpreter to taplement an instance of the S~machine>— 
leer a EunNg SOL program. : 


Code segments and ae oH 


— Code Segments are virtual as in the other swachiness but 


the Code Segment Dictionary itself segmented» 


- corresponding to the page- veuiak: head in the SOL 2 
languages © Each entry in a Master Segment Dictionary 
ume pce seit> 2 a page of segments in the source prograsa and 
points to a sub-dictionary with the entries for those — 
segments. | The Master. Segment. Dictionary 15 i a eae 
at the sub~dictionaries may te overlaid. . | 


Fite inforsation blocks: Frets) and FIs dictionary 


These appear. in Correos: wemorys. one FI8 per open ‘file 


in-use by the running program» used: by: the aystem.. for 
_ input/output oper ations. | hb Ske 
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Registers. 


‘These may be either in hardware registers or in memory 


depending on the state of the S~aachine. The exact 
format and nuaber of registers ts tgeportant only to the 
SOL interpreter. Logicaitly» they consist of the next 


instruction pointer Cpage» segments and displacement)» 


the current lexic level» and the stack top pointers for 


ail stacks. Current LL and the OISPLAY stack pointer 
are the same register. Also in registers is enough 
information about the stacks to check for stack over- 


flows. Underflows are not detected. Registers are 
initialized from the scratchpad area of the progran 
parameter block tn the code file» (See MCP reference 


manual). This area has the following format in SOL 


cade files: 
1 SCRATCHPAD> 


FILLER | BITC48)> 


2 
2 PPSe-BASE ~~ BITC24)>» 
2 FILLER © BIT{ 24) > 
2 ES.BASE | BITC24)» 
2 ES.PPS.8ITS BITC24)» 
2 WS.BASE GITC24)>» 
2 ‘FILLER BIT(24)5 
2 €S.B8ASE | BIT(24)> 
2 CS.-BITS | BITC24) >| 
2 NSBASE  BITC24)» 
2 FILLER  BITC24)> 
2 DISPLAY. BASE —— « BITC24)» 
2 FILLER BITC4)» 
2 PROFILE. FLAG — «BITCL)» 
2 FILLER  «-BITC19)» 
2 WS-8ITS © BITC24)>» 
2 NS.BITS | BITC24)> 
2 €S.B81TS BITC 24)» 
2 


PPS.BITS «BITC 24)3 


See the MCP Reference Manual for a sore generat discus- 
sion of code files» run structures» fite information 


blocks» and the various dictionaries» These concepts — 
are common to att the 81800/81700 S-machines. Note. 


that SDL does not make use of data segments and data 


segment dictionary» — pare eennens virtual data via an 
SOL intrinsic instead. 
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IKE BASE=LLMIT sae 


The space. as ‘divided as ‘chown: an the diagraa below- with the | 
lal pode one: the direction of growth. a | 
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FIGURE Let SDL STACKS 


_ WALUE STACK =——————s Entries are values of data items» — 
bs got . * , arbitrary in Lengths the character is~ 


tics of which are kept an descriptors _ 


ap the NAME and EVALUATION stackse— 


NAME STACK Entries. are DATA DESCRIPTORS» 48 bits 

ee 8 ee | ain Lengths. one descriptor for every. 

data identifier which ts currently 

active. Cnot necessarily addressable) 

an the programe The descriptor for | 

an array is 96. bits long» occupying | 
two NAME STACK ee teats ~ oe | 


— pEsPLay a ~The NAME STACK as divided into stack 


frames» each frame containing the 
descriptors for. the. names declared in 


one invocation of a procedure. Not ~ 


- altoof these stack frames contain 
descriptors | which = are currently. 


accessible. | The display contains 
pointers eo Te ee STACK» one 
pointer. for @ach Lexic Level less | 


than or equal. to the current. Lexic 


_ Level. Each pointer. locates the base 
of the frame for currently addres~ 
sable names at. that tevel. These | 


entries are 32 bits tong. | For | 


further — discussicn of the “display 
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mechanisae the reader should consult 
Literature on une implementation of 


Here are the NAME STACK pointers 
which locate the stack frames for 
every active procedure. Each time a 
procedure which requires tlocat data 


or parameter  attccaticns» (1-Cer. 


requires space on the NAME STACK) is 


entereds §anew entry is pushed onto. 
‘the CONTROL STACK to point to its. 


NAME STACK frame. Since the VALUE 


| STACK cortains the data associated 


with NAME STACK descriptors» it too 


is divided into frames and the base 


of each frame is recorded in the 
CONTROL STACK as it is allocated. In- 
addition to these two pointers» each 
entry contains the Lexic Level of the 
calling procedure and the Lexic Level | 
of the current entry. These are used 

by the S-*Machine to. e#aintain. the. 


DISPLAY. The format of a CONTROL 


STACK entry is: 
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FIGURE he 


EVALUATION STACK 


PROGRAM POINTER STACK | a 
| | —  attor used for Looping» att transfers. 
of control in the SOL machine are | 
done via call- type operators. The | 

next instruction pointer is saved for 
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4 BITS 4 BITS . — 20 BITS: 


“CONTROL STACK enter FORMAT. 


The EvaLuatron. STACK is used-te hola.” 
oe descriptors for the ‘evaluation. 


ofS OXKGFESSIONS | Cexpressions are 
ieoapited: ¢nto reverse polish — 
strings). — It is also used to buttd 


actual parameter cescriptors prior to 


their being. transferred to the NA ME 
STACK for a. procedure calt. Space. 


for. data during expression evaluat ion 


is allocated on top of the VALUE 


STACK which is kept up to date as. 


descriptors are pushed on and popped | 
off the EVALUATION STACK. 7 


With the exception of the eet: oper- 


subsequent return by pushing it onto. 


the PROGRAM POINTER STACK. The 


format: of an. entry in this stack ist 
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“DATA CESCRIPTORS. 


Siaple (scalar) descriptors are 4A bits in tLengthe with the 
following for mat? | | a | Ts 


kkk kkk eke kk kh kkek kk kkk ehh hehe khkh etek ehhh kkk hh hkkK k 


e | te | 7 & ae ee = te 
« TYPE « LENGTH fe — ADDRESS | fe 
te | ot t a . . | * 


Re e&eaek RaERKKKAaKEKEAaAKE RAE KK kK hk KkhKa KK KaR Kk hRKEK kAhkhhkkhhkkhkh ehhh tk 


8 BITS le BITS 24 BITS” 
FIGURE 1.4 SIMPLE OESCRIPTOR FORMAT 


The address is specitied as a bit offset from the base register 
Cwhich is atsc the base of the VALUE STACK). $=The tength is 
expressed in bitse regardtess of the type. 


One of the bits in the tyce field indicates whether or not this 
is an ARRAY. DESCRIPTOR. When this bit ts one an additional 48 
bits of infor matton its appended giving the following format: a 


kkkkhe kkkeRReKEKEREKEKKEKEEKKEEKEERKE EKER 


t x a * | i 
* TYPE  « LENGTH OF &  ADORESS OF i 
ee 8 ENTRY | ft o 4 ARRAY te 
fe 7 ee te | fe 
kkkektkkkhkhkkkkhehkkkk hk ek kiekihkkkehhkkkk kk ekki kkk kkk kkke tk 
2 er k . | 7 * 
* PAGE * LENGTH BETWEEN * NUM@ER OF te 
*SUBSCRIPT*® ENTRIES «© | ENTRIES * 
* SIZE x | ie an —_ ° bt 
* | te | oo + we. * | & 
De RR TT KAT RK KKM KREME RENE KEKE KKEK EK KEK 


8 BITS 16 BITS a 24 BITS 


FIGURE 1.5 @RRAY wen res; 


‘The Page Sub script Size is Peres used uNeR the PAGED ARRAY. bit is 


on in the type field. It specifies the nusber of bits to shift 
an Array Subscript) to obtain the corresponding Page Supe EIOe, 
— (Page sizes are always a power of two in SDL). 7 7 7 


 gurrouens ¢ CORPORATION. es een COMPANY | CONFIDENTIAL 
© COMPUTER _SYSTEHS: GROUP 2) Ae 100781700 ‘SOL aca bid mone 


mee Length: batueen: entries is the ai tapenee hevicen the stated tt 


of one. element and the address of the previous element. This 


must | odd greater than or equal to the pongen of one onthe: 


The: Type Fiete of. a “deseriptor has a ange formats even though 
"Some. ‘bits | are not acon eng he. tn alt, CONtExtss ” : ie * Bie 


1°9 


BURROUGHS CORPORATION = |. COMPANY CONFIDENTIAL 


elements = Length of one etement. Crit. 
2 must also be one) 


** 1 => array. 


COMPUTER SYSTEMS GROUP = 81890781700 SOL S-LANGUAGE | 
| SANTA BARBARA PLANT © _. | | —— Pe Se 2208 2589 CLD 
KRREREE ES EERE REE ER ER RE RRR RE OS 
rn ee «& &  t 
® GC & lL & 2&3 w& hE & 5 & He 7 & 
te te a t & oe 
kee ekkkhk kek kh keke hh keh keh 
te ~« & a ee 
* * t kt tk + w : a, | 
fe a « & tk & & « s#ee J => Length VARVING(#). 
« « a ok R = | a. 
ew te te oe. | - 5 
S + & « hee $ => PAGED array (bit 2 must _ 
= 3 =: * 7 also te on) a 3 
~~ «& & tO _ | | 
« & hee data type: 00 => BIT. 
* * * _ OL => FIXED. 
_* ss & 10 => CHARACTER © 
& * La 11 => type VARYINGC®#) 
ke i | | es - , a 
& kee | => contiguous arCay ieee» Length between 
* te 
& & 
i & 
* * 
ae, 
ik 


ae => non~self-retative (must be on if vit 2 is on) 
09 => selfrrelative — | | -- & © ; 


+ Pee ee he ee Re eR Re ee 


** namesvalue bit 1 => value 
_ => nane — | | | | 
Cused only when the descriptor 
is on the EVALUATION STACK) 


(x) Only used in the type field of in-line descriptors which 
; are arguments of a CDFC operator and in the argument to a- 
RTNC operator. The COFC operator also uses BIT 6 in a 
different ways - it indicates a varying array bound. 


In-line descriptors for other operators use SIT 0 to indi- 


cate the presence of a fitter field. See  IN@LINE 
DESCRIPTOR FORMAT. ee | | 


FIGURE 1.6 GESCRIPTOR TYPE FIELD FORMAT 


When the data itself is 24 bits or tess in length» jit may be 
contained directly in the address portion of the descriptor» thus 


- - vequiring less storagee In this case» the descriptor is said to. 


be self-retative and the non~self-relative bit is off. 


ate 


— gurRausHs- CORPURATION oe air COMPANY. eae. 
COMPUTER SYSTEMS rove eee B18007EL 700 | SDL S-LANGUAGE > 
reins BARBARA PLANT eer es, ee PeS. #22G1 2389 (Ld 


thet use. of the NAME-VALUE. res is to distinguishs — in the: evalua 
— TIGN STACK» between des criptors which had. an associated value 


loaded on the “VALUE STACK. when they were gushed. on the EVALUATION 


STACK» and those which did not. The purpose is to signal that a 
data item should. be cut back from the. VALUE STACK - whenever _ this. 


- descriptor is cut back from the EVALUATION STACK. The bit can 


| ag by DE Se eal tl teal aaa ac 


<< ee oe aun ae <> am Oh ee Se are ae oS Swe ie em ces 


“When ee PAGED bit ee ane in an array. age cet nears fi the. er ee 
field of. the descriptor does not: point. directly: to the artay» but 


 pather is initialized to zeroe An array load operator CALAr AL) 


will then detect the first. access to the array and. invoke. the SOL 


virtual memory manager to build. a page table mn dynamic memorye 


‘This table will be non-overlayable and the descriptor address 00". 


field will be set to the page table address.e The table. contains 


one entry per array pager each with the Format telows 


teak Re eee ek ee tk eae Re ky @ 
« STATUS * a “ADDRESS ae 4, voce: FEE 

=? oe se Doe oe ae 
(ERE RR EE EE REE EERE ER ER EERE RRR EERE ERR REE ERE 7. 


4 BITS 24 BITS 


aati edi Me eas is } 


7 t-11, 
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COMPUTER SYSTEMS GROUP = . 81809781700 SDL S-LANGUAGE 


SANTA SARBARA PLANT se Pa Se #226 2389 CL) 
“STATUS EJELD 
bit 9 presence bit 1 => address is oase relative memory 
ae | | address. | : ys 
9 => address is disk address 
bit 1 to be read onty ft => the next time this page is 
| | "se & : roiled outs turn this bit off 
and bit 2 cone | _ 


bit 2 read only | 1 => this page may te overlaid 
| | | | without rotting it out to diske 


bit 5 unused | 


An address field of zero indicates that this is a previously 
unaccessed page and may tke created without need for a rollin. 


- gueraucus. CORPORATION Arges aa Gis COMPANY eaauamre 
“COMPUTER SYSTEMS GROUP (B1800/81700 SOL S-LANGUAGE 


SANTA BARBARA PLANT PP sinetes ea Dag Ps Se #22ub (2389 MOP 


ars annacasts 


whe S- <(anauaue: addresses. data via descr etoes: on the NAME. STACK. 


ALS any point in an SOL. program every accessitle data jtem may be . 


- described by. the Lexicographic. Level at which it was declared and 


its ordinal  tocation (occurrence numper) within the declaration ~ 


section at that tevel. A data address thene | consists of these oe. 


two numbers which. uniquely. locate. a descriptor. in the NAME STACK. 


_ Addressing is done by using the. DISPLAY to locate the NAME STACK 


frame corresponding to the required Lexic Levels and the occur ~ 
rence number to locate the descriptor within that frame. For — 
-compactnesss data addresses have a. type field which indicates the — 
sizes of the other. Fieldse as. indicatea below: a 


FIST ETIS ETSI ICIS TET Tae Tee TTT Saat e aT ee eh et 2s oe 
ft TYPE an EEeTe LEVEL | oe Dee Ute NUMBER» fe 
fk ar cae te _ a 
ERE HERE REE ER ER EERE EERE RE RERRRE REE ERE RE REE 


2 BITS a4 BITS 5440 BETS” 
ae Got ure aun rote 


TYPE LEXIC LEVEL BITS” | OCCURRENCE NUMBER giTs TOTAL BITS” 
Mor fe ee mB a Eg, See Ee ee 
igh AOE uh he, 4 to Bye Oe we Bee, oat: 
Reg Pd os Bw oust oe Fe OM gg “Pe CY Le es ee 
re ee er ee es en 2 


“When any, one bit is. used for ‘Lexic Levels | 9 means” ie tie: Level OG. we 


and lis taken to mean the current Lexic Levels. whatever it may 


i an 


“BURROUGHS CORPORATION PANY CONFIDENTIAL 
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CODE ADDRESSES: 7 


Code addresses appear as arguments of operators which effect 
transfers of control. They are divided into three parts: |. the 
page number which selects the segment dictionary paye» the 
segment number which selects the segment dictionary entry within 
that fage» -and the displacement which specifies a bit offset 


within the segment. For compactnesse these numbers are encoded | 


in different field sizes depending on a type field. 


eee Rae aR RRR RE Re ee EEE REE EEKEKKEEKKEKREKKEKKKE 


* 7 & "48 & | 7s 
« TYPE fe SEGMENT x P4GE  & DISPLACEMENT * 
ot ®t | k fk a & 
tk&thkekkkhkekkkh kk kk kkk hk kk keke ki kkkkkkhkkkkehhkeikke ikke kkk kek 


3 BITS O76 BITS %S/4/6 BITS 12/16/20 BITS 


FIGURE 1.9 CU9E ADDRESS FORMAT 


TYPE  SEGNENT BITS PAGE BATS OLSPLACEMENT BITS TOTAL BITS 


00) CURRENT © CURRENT © ~~ 42 15- 


OO1 - — CURRENT — CURRENT . 16 ee ©) 
Cla fb CURRENT | Se (2k 
G11 6 CURRENT | 16 25 
100 6 4 4 | 12 » e 8... 225 
10a 6 | 4 | 16 29 
119 an: | an oe e 2h 33. 
11109) NULL ADDRESS s : | | 
C1), 6 — ee 20  -36 


(The type LLL with following bit of f> NULL ADDRESS» is used only 
to mark nult entries in a CASE operator. fhe Length of this code 
type is the same as the code address type Seer yee by the CASE. 


se chen “ates aeneegd 


Pee ott eee 
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CONTROL 
STACK 


>. FF ® + BP Pe ® 
ee 


20 ies noes 


 & we wee nw ewww owe _& ©@ ; a iealsietehatetatetetetateiedatetel 


 ®@ NANE STACK POINTER® ‘@ VALUE STACK POINTER® | 


tke Ake khi hae keke khan keke et ee 


Me ie 20 Bits. oe & 


ke eee ee 
Settee 


oe 


ae a 
EXITED LEXIC LEVEL#e*  oseeENTEREO LEXIC LEVEL 2 #& 
ee Ve es, CONTROL 

STACK 

POINTER © 


ee oe 


CURRENT CONTROL REGISTER 


20 Bits De POE 2 ps : 20 Bits 


eerie sae kKkkkkkkk ehhh kh ee xk FERRER RE EERE RE EE REE EERE ER EER ERE 
ae aa. ee ee ee ee SS 


as CURRENT NAKE STACK PTR* ve te CURRENT. VALUE ‘STACK PTR 


a ae ae tr ee ee ie ae 


BP ETERITEPereeere ee ererereTecetecevavecerereeeer rere rere Tiee creer eee 
th by en Re el, pie SRE TELLER. 3 
— CURRENT LEXIC LEVEL &eee . 


| a | e — 115 
BURROUGHS: CORPORATION ee COMPANY “CONFIOENTIAL 


COMPUTER SYSTEMS GROUP 1 B097B17G0 SDL S“LANGUAGE — . 
AES COREA ELAN Se #2201 2389 CLD 
The. following SOL ducldration is used by at gor ithns shown under 


the operators which affect the CONTROL STACK. 


DECLARE 


on CONTROL. STACK (CS.S1ZE) gh BITCAB Ye 
02 CSeNSP BT ERO 

2 CSsEXITED-LL & 4 4 BITCA)® 

02 CS.ENTERED.LL BITCH), 

22 CS.VSP BLT(29)> 

91 CURRENT.CONTROL 7 BITC4E)» 
G2 CURRENT.NSP BIT O20 

92 CURRENT.LL | . BITCH). 

02 FILLER 7 a. BITC4)> 

02 CURRENT.WVSP | ao BITC20)> 


CCSPe TCSP) FIXED; 


"  gurroucus. ¢ CORPORATION ete Cae a. COMPANY. pune toEWTTA 
— COMPUTER SYSTEMS Group Be Poe acini git ich SDL S- “LANGUAGE 


(SANTA BARBARA PLANT Pat eres PeSe #2201 2389 cy 


The SDL operators that use the CONTRUL STACK mechanism are: 


WKS = WARK STACK a 
(COM = CONSTRUCT DESCRIPTOR, FORMAL 
core — constTaucT DESCRIPTOR» FORMAL CHECK 


MKU = MARK STACK AND “UPDATE - 


eat = xT 


ORTRN =) RETURN 5A 
RTNC = RETURN FORMAL CHECK 


 OXTEL +) EX ITs ENABLE INTERRUPTS 


7 | | wo eee 
‘BURROUGHS COKPORATION COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP . “pienosei 700. SOL S“LANGUACE 
SANTA ane PLANT | — | | PSs ‘#2261 2389 (L) 


ane am ee ae ae ame a aun en ae a ee ae ee 


INLINE DESCRIPTOR FORMATS 
ECR CONSTRUCT DESCRIPTOR OPERATORS 


> em can 7a" an | eee le CER EE ie EP te ED OR ae ae UR EP nae One nem Gee a app ane 


STAPLE DESCRIPTOR 


8 BRITS 6/17 BITS 6/47 BITS 


kit hk khkkkhkh kk ekkh ak kkkhkkkhkkh kk kkkk kk ent 
* TYPE * LENGTH FILLER * 


kikthkkhkhkk&khkk kk kkkk kk kk kt khtekk&kkhkkekhkkhkhk kh 
a 


xxx OPTIONAL | 
Notes: 


le The fitter option is present only when bit o of the type 
field is on (€=1).. .- ¢ oo 


(2+ Bit 2 of the type field is off (=0). 
ARRAY DESCRIPTOR 


8 BITS 6/17 BITS 6/17 BITS 
kiki kk kk kh k& kk kk &K KK te te te &k kktkkkk&kkkktkkkkk tk kRkae tk hae hk & 
* TYPE «© LENGTH OF ENTRY ®© FILLER * 


kKkkkkkkkkkkkekkekeke kk kh cae wee aeK KARE KRKEKEKKKKEKKEKEK KKK K 


3 
OPTIONAL 
ake k eee eek eee hehehe hk 
s te | Be a 
- @/17 BITS 8 BITS 6/17 BITS. 
kktikkkk tk kkkkkikk kk kk keke kk kkekkkkkhekekek hehe 
* LENGTH BETWEEN «  .® NUMBER OF ENTRIES *® 
kk thkthhikkhhkkkh hk kk ek hh kk kkkkkkkkkekkkkkk kkk k 
Pa 


te For paged arrays this is the — 
| number of bits of the subscript 

- needed to obtain the page ee 
subscript (See AL: Array Load). 
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 Notess 


a the filler. épt ton. en ee ee eae 
A is” on G a gE ge it ok, OS eee pe fa ceee we, a oe 


an The length between Savion: is present only when bit. three 
of the type vee 1s. off Cee ra : 


$e Bit: two of ‘the type field as. on G aye 


“ay The page subscript size tietd ve oscnt only when bit. 
oe six of the bead fvetd is ane | "2 i, ae we re a 


ge TE: bit six of ‘ene: type field 4s sone then bits zero ang 
three: wid be of fe | ‘oe 2 a 


6 The fields earked "6/17 Sete beh onct shah 


ven Bit Meaning 
dS bits follow 
1. 16 pits follow 
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SANTA BARBARA PLANT | SS P.S. #72201 2369 (CL) 


HE << a ane a me Ee OS a ae atm: 


USE ot KE EVA LUA TLON STACK 


Many of the 5 DL S-ops take operands from or leave results on the. 
EVALUATION STACK. In fact» only the descriftcr of the cperand is. 
on the EVALUATION STACK itself while the data» that is» the value 


of the operand,» may be in the descriptor or elsewhere in the 
base~limit areae Conceptuatlyr however» it is an operand with 
which the Sctop is dealing. There are two classes of Sper ans or 


results which may be on the EVALUATION STACK? 


Address operands: 


The descriptor is a pointer to the value of a dectared data 

item. The descriptor cn the EVALUATION STACK is nonvsel f- 
relative and its namecvatue bit is off. This type of operand 
is appropriate for use as the destination of an Stop which. 

moves datae | - oe 


value operands: 

‘There are two classes of yalue operands. 

sel f- relatives -_ | - | | 
‘The descriptor on the EVALUATION STACK is marked self-. 
relative and its name-value bit is off. Instead of the. 


address field of the descriptor being a pointer to the 


data» the data itself is contained in the address fie ta 
of the descriptor. 7 


Non self- relative: 


The err Te on the EVALUATION STACK ds garked non-_ 


self-relative and its namemvalue bit is one The data is 


on top of the VALUE STACK» tocated by the address field 
in the descriptor. When this type of operand is removed 
from the EVALUATION STACK» its vatue is remcved from the 
VALUE STACK as well. 7 7 : ; 


Value operands are temporary. values as opposed to actual. 
variables of the program.  , e e | ‘ : a. 3 


my particular S-op often Aeauiees. wena its operands be of a 


particular class. It does not make sense» for example» for the 
destination operand of a STOD Cstore destructive) to te a vatue 
oper ande 2ome S™ops put other restrictions on their operands» 
.- usually concerning type or Length. Unless specifically indi- | 
cated» these restrictions are not checked oy the interpreter Bee a 


if not met» the results of the operation are undefineds . 


‘ 


| 24 
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INSTRUCTION SET 

Op codes are fours Ssixe ten or thirteen bits in Length. ¥ «The 


lengths have been assigned according to static frequency of the 
 S*ope thus” compacting code space as auce as POSanonee | 


| RELATIONAL OPERATORS 


SBR BRO nnaes ae a wae as 


NAME ANEMONE ©©OP CODE ARGUMENTS 


EQUAL TOO EOL oe 1010 31 

LESS THAN =~  @. Ls 1Lit 91 1019 
LESS THAN UR EQUAL TO © LEQ | 1111 oO 1110 
| GREATER THAN 7 GTR ALLL oo 1001 
GREATER THAN OR EQUAL TO EQ 00 1191 


NOT EQUAL TO NEQ —-s-: 1910 10 


ARLT HKET IC OPERATORS. 


NAME a WNENGNIC =P. CDE 


oe a Creer S| 
SUBTRACT > % subs AD 

MULTIPLY =~ | HUL :  AALa 90 0191 
— OLVIdE aa i. Diy Lill 09 S114 
-xODULC = SF MoD sR OO ORL 
REVERSE SUBTRACT SUB ARAL LO 800 
‘REVERSE DIVIDE = =———<“‘“‘«é CSC OL 

REVERSE wapuLo 7 - | -RMOD aan Lo 1110 
NEGATE : NEG ss ALLL G1 O41, 
CONVERT TO DECIMAL = =—sO*DEE tab 1e 168d 


CONVERT TO BINARY BEN dada 26 1002 


EXTENDED 


NAME 


EXTE NCED 
EXTENDED 


EXTENDED 


- EXTENCED 


EXTE NCED 


LOGICAL OPERATORS: 


NAME 


AND 


ORS 


~ guRauuGHS: CORPURATION. 
COMPUTE? SYSTEMS. GROUP 
«SANTA JARBARA PLANT 


AG ITHMET IC UPERATORS- 


ADD 


SUETRACT 


MULTIPLY 


OLVIDE 


MODULO 


EXCLUSIVE- UR 


NOT 


MNEWONTC 


yap. 


XSUS- 


 XMUL 


— XOTY 


XM OD 


ANE MONIC 


NOT 


= COMPANY. CCONPLOENTE ALS: | 
S-LANGUAGE 


—wLeoosai790, Sot ti ee 
 PaSe #2201 2589 Ld 


op coor 


tele totaal: 


meets Lt 1100- ; 


‘LIL LL 1100 


Lit i 1109 


4421 11 1100— 


ALLL 06 coou 


“LLLL 00 CoL9 


ARGUMENTS: 


Atta 00 1011 
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STRING OPERATORS 


NAME 


MNEMONIC OP COVE 


CONCATENATE = =——<C—s—ssts~‘s~C™SS AT 1100 11 


SUBSTRING ONE ns on L111 11.0100 — TrVrQeL 


SUBSTRING TWO $8? 1111 0C 1000 ~—‘To¥ 


SUBSTRING THREE = S83 ACG OO TeV 


STORE OPERATORS 


NAME 


ARGUMENTS 


—MNEMONIC OP COUE 


STORE DESTRUCTIVE. stood) ss 


STORE NON-DESTRUCTIVE LEFT SNOL 1010 11 


«STORE NON-DESTRUCTIVE RIGHT SNOR ALLL G0 O10 


— CUNSTRUCT DESCRIPTOR OPERATORS 


NAME 


MNEMONEC 1 CODE ARGUMENTS 


> ea Gan Gham Cs oe es ee YS OU ao ae aaenwmwem @ @ 


CONSTRUCT DES. BASE ZERO COZ 1111 16 9100 DESCRIPTOR 


CONSTRUCT DES. LOCAL DATA colo  ibineos | Ne DESHLossee — 
| | . _ > - | | PE S#n © | 


CONSTRUCT DES. FORMAL. 


CDEM 


“CONSTRUCT DES. FORMAL CHECK COFC 


CONSTRUCT DES. FROM PREV. = COPR 


- consTRUCT DES. FROM PREV. 
esOO Ue, © 


taal ae ade PREV. 
OR MULTIPLY 


CDAD 


COMP 


Lilt 


1111 


eer 


1110 


an 


cl 


9001 


LL oe 


11 1161 900 LLeEsDES# Lee ee 
= | DES#n | 
10 | ON era 
wae UL a : 


01 | . , DESBLrewer 
a OS tr | “ 


OLOL. _ NDESMLr eeer 


eee 


pe 
C > - 


- alia 


CONSTRUCT DES. 


LOAD 


cineee 


— guarousHs | CORPORATION. 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


cons raucr oes. LEXIC LEVEL 


OPERATORS = 


2, que 


<-> — = a 


‘DESCRIPTOR 


- WALUE DESCRIPTOR 


“DESCRIPTOR: 


| NEXT 


Loan 


— LOAD 
LOAD 
EL ONR 


Loan 
een 


ce PREVIOUS 1TEM 


ADDRESS. 


ARRAY, FIELD ADDR. 


FIELD ADDRESS 


FIELD ADDRESS 
PRE aus 2. 


ARRAY. LOAD. VALUE 


ARRAY LOAD ADDRESS 


INDEXED LOAD VALUE 


INDEXED LOAD 


INDEXED LOAD FIELD 
ADDRESS, we 


Ae ey 


LOAD. NUMERIC LITERAL 


too NUMERIC 


ia: 


DYNAMIC 


ADDRESS 


ZERO 


COLL 


corm 


a) ae 


MNEMONTC 


LETH 


oT 


(Pose 


etree 10, ort 


ae tai 


PELL LL LLG. 


OP CO0E 


ALLL 


4221 


1100 
EVEL: 


tot 


4an1 


ol 
10: 
ol 
— ocoo 
i 
- 
ut 


1 OL. 


OL 


1111 


19 


oad 


ee “COMPANY. Y CUNFIOENTEAL 
8180081790 SOL S-LANGUAGE 
| #226L 2389 CLD ie 


“type AL bS0ee72 


090 


1010 — 


1609 


99 


1111 


LLL 


4111 9 


DESCRIPTOR | 
DESCRIPTOR 


TYPE 


“ARGUMENTS ere e 


eee 


dlob 


‘TYPE- bho 


aamialae 


YPESLL=OG 


O1l 


OO 


1100 


1 oi 


1111 006 


2006. 


—TYPE® 
LENGTH». 2 
TYPE Li-0e: 


TYPE, 


TYPES LENGTH 


OFF SE. 


aves OFFSET. 
LENGTH. 


saliatidn 
TYPE-LL-0C 


ee = 


OFF SET» 
ee wity : 


TYPE, LENGTH 


LITERAL 


LITERAL 
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LOAD NUMERIC ONE ONE J116 
REFER RE R Lit 12 L111 106 
STACK UPERATORS 


op “CODE ARGUMENTS 


NAME 0 MINE MONE 


BUMP VALUE STACK POINTE? avsP sa AL «20 «1012 
‘CUPLICATE ouP sn 809 90 


DELETE ERA OG GOL 


EXCHANGE 


FORCE VALUE STACK 


PROCECURE OPERATORS 


— 
CALL 

IF T HEN 
“IF THEN eLse 


CASE | 


UNDO 


‘UNDO CONDITIONALLY — 


RETURN 


RETURN FORMAL CHECK — 


EXIT 


MNEMONEC 


CALL 


If TH 


IFEL 


CASE 


UNDO 
UNDC. 
RTRN. 


— RTNC 


EXIT | 


oP COOE . 


cLiy 


1111 «0 


01 


— $GOL 


19. 


1 0160 


ARGUMENTS 


 TYPE-SEG- 
PAGE-DISP — 


TYPE=SEC- 
PAGE-DISP. 


ADDR TYPE+ TYPE 
SEG-PAGE-DISP 


# OF ADDR» ADD 
TYPE» TYPE-SEG. 
PAGETODISP > wea» 
TYPE= el ~PAGE-— 
DISP 


ft OF LeveLs” 


—— 8 OF LEVELS 


OL. G10L # OF LEVELS 


AL Liot 001 # OF LEVELS» 


oe 


OTYPE*LENGTH 


# OF LEVELS 


 gunRaucHs | CORPORATION 
COMPUTER SYSTEMS GROUP 


7 company. {CONFIDENTIAL 
BiBGO/B1766. SUL S“LANGUAGE 9. 


| SANTA BARBARA PLANT ee PaSe #2201 2589 ene 


evcce 
aa STACK | | 
WARK STACK ANC “UPDATE 
eENABLE-DISABLE, INTERRUPTS: 
—EXIT*ENABLE INTERRUPTS. 
© Co-ROUT INE ENTRY 


7 co ROUTINE EXIT 7 


OMS _ CALL 


search g SCAN OPERATORS: 


NAME 


ee 


SEARCH SDL STACKS | 
— SEARCE LINKED LIST 


SEARCH SEREAL ust 


“saat SEARCH ae 


THRE AD. VECTOR 


-wrrrayize vector 

sort STEP DOWN 

SORT SWAP 
| soeT uNatock 


DELIMITED TOKEN 


ed: Ss 
| CHARACTER FILL 


MNEMONIC | 


oe ROUGE. 


“ss 
SSCH 
TEC 


IWEC 


eee ge 


1110 1 


| nee 


aang O1 tli. 


Ladd 11 e146 
eeicurs’ 1010 
HALE LL L010. 


ADMD AL ELS 


oP cove 


ee a ee 


rie: 


—annn tt Lite 
“111i cL 1026 
seit wal 
LLAL AL LOUL” 
L111 11 1011 9 
L11i 1h 1011 
tdi 1b 1611! 
LALE dt Lond 
rere fi 1011 


ALD LE L0Qn 


ake cee 9 


“MAL at to0t 


ALLL Tt oto 


O01 


oll 


“DISPLACEMENT | . 


fe Te,” 


vO 


Vee OF LEVELS. 


“ARGUMENTS 


| VARTANTS 2 
TYRELL ac 


COMPARE TYPE 7 


COMPARE CTYPE 


—TyPE- LL- “ace 
— DELL+ DEL2 | 


ween?” 
_ SEPARATOR> V 


TYPE-LL-0c 


- guRROUGHS: CORPORATION 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT. 


- TRANSLATE 


FIND CUPLICATE CHARACTERS 


HISCELLANEOUS: OPERATORS 


NAME 


“eam 


TRANSFER MESSAGE 


HASH CODE 
—RASP UNPACK | 
SWAP 
FETCH | 
 pIspaten 

HALT | 
READ CASSETTE 
LENGTH 


LOAD SPECIAL 


— NDL SOPS 


= CLEAR ARRAY. 


COMMUNICATE 


 REINSTATE 


FETCH CMP 


DATA ADDRESS 


| “SAVE STATE. 


HARDWARE MONITOR 


OVERLAY 


PROF ILE 


PARITY 4 ADDRESS 


XLAT 


FoOUP 


— ANE MUNIC 


NF RM 


an7 


COMPANY CONFIDENTIAL 


BL8C0/8B1 706 SDL S“LANGUAGE 


PoSe #2261 2389 CL) 


LALL 21 £110 101 


“1111 11 1001 011 


OP CODE 


1111 11 1016 610 


L111 11 100C OO1 
Qhiodl 2111 104° 


L1l GL 6116 


Lili 11 1112 110 


ARGUMENTS 


DEST. VARIABLES 


SOU RCE 


VARIABLE 


LL» ON 


 VARTANT. 


TYPE» #DESC 


ENTRY NUMBER 


BURROUGHS: CORPORATION. “20 bs COMPANY. CONFIDENTIAL 


«COMPUTER SYSTEMS. GROUPE B1ep0/81700. SDL S“LANGUAGE = 
SANT BARBARA PLANT Wa Bee gS Bese ‘#2201 2589 (LI 


“os enccure- SOBRE eet yfipan 1110 ree 


— comMUNTCATE WITH GIsmo = CMG AMAL AL 1110 110 


ADD TIMER a oe apt f111 11 1100. 90¢ | 


 suBTAACT TIMER — suBT) ALL BE LLOD Got 


371 


BURROUGHS CORPORATION = = COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP B1860/B1700 SDL S“LANGUAGE 
SANTA BARBARA PLANT : a P.Se #2201 2389 CL) 


NAME MNEMOMIG OP-CODE ARGUMENTS 


EQUAL TO S| Ss COM y! 


LESS THAN LSS ADA 01 1020 


LESS THAN OR EQUAL To  LE@ ANAL 9G LALO 


GREATER THAN. =e GTR ALLL CO 1601 
GREATER THAN OR EQUAL TO GLO 1111 0G 1191 


NOT EQUAL TO —NEQ «4010 10 


Sparse: goReagntron 2 ee COMPAAY. (CONFIDENTIAL 
COMPUTER SYSTEMS GROUP @LecO/GL7G0 SUL S-LANGUAGE 
SANTA BARBARA PLANT ee te . aa as P. Se 8z201 2382 (meee 


Syntax? 


| | RELATIONAL OPERATORS: 


kk hk ek kik 


CQL * NPQ 


RKRKAK AREER EH 


Ln GTK. - Lss - 


ere tei.) et 2. 


| ot GE Q * LEQ eo 


i tee nee nen eee 


NEQ Not equal to. (/=) | 


GIR = Greater than = (>) 


LSS Less than Ce) 


GEQ . Greater than or egual to Oe) 


LEQ Less than or equal to _ (<=) 


. Format: 


€QL 


NEG 0 OGTR 


tte ete te tet te kek keke nKKKE RRR RE REKEKAEKEAREEREK 


 ® 1019 


OL * © 1016 10 * © ALi2 09 1LOOL ® * ALLL OD LUD *® 


tee ee eta es ee eee a2 2 2 shall abet letale hal tala t baka bohsiotstad taletebabetaball 


“OP ~Code- — OPCode = OP=Code ‘GP-Code- 


GEG. ee Ee 


ertetitittt ett tee ttt eee et ttt _ 


* L1it 


GO 1101 * * 1111 GO 1110 « 


MEE TITTTILITT TTT TST TTT TTT TT 


: a. 


ae operands: are “expected to be on top” of the EVALUATION - 
STACK. = «= The tower operand is considered to te. on the left. 


side of the relation» warle the: non operand is” considered — 


to be on the right. | 


~The. - retationat. operators. ona. comparison between “Ewan 
operands — at any data Se ae. operands: are ER OV CR: frome 


3-3 


| BURROUGHS CORPORATION Sec, tee OF - COMPANY. CONFIDENTIAL 


COMPUTER SYSTEMS GROUP 8100/8176 SOL S-LANGUAGE | 


SANTA BARBARA PLANT ae . PRP eSe #2201 2389 CL) 


the stack and a> self-relative descriptor of a i-bit 
result is returned whose vatte is: | a 


1. When the condition is true © acidia 


2. When the condition is false - a(L)Ga_ 


When both operands are FIXED» the operator does a true 
stgned arithmetic compares | | : 


When koth operands are character strings» the compare is 
done from left to right» using blank fill on the right 
for the shorter string. | | : | 


For atl other. operand coabinations leading zeros are 


supplied to the shorter of the two fields. No sign 


analysis is dane and the operands are eae. as. poses 
magnitudese — 


— COMPUTER SYSTEMS. GROUP 


re roe CORPORATION. 


SANTA, BARBARA PLANT See a aie calcd 2589 aS 


Ce ee Oe A ee ee ee 


set WMELAG OPERATORS 


| “COMPANY. CONFIDENTIAL 
-ereo0s9i709 Sut S"LANGUAGE: 9 


“SUBTRACT 
MULTIPLY | 
DIVIDE 

~ oouLe —_ = 

REVERSE SUBTRACT 


REVERSE DIVIDE - 


REVERSE MODULO) 


NEGATE | 


CONVERT TO DECIMAL — 


CONVERT TO GLNARY 


400 


SUR 


MUL 


OLOL 


Ligh 
1110 


Gil. 


“Gare F 


ou 


1609 


--BURRUUGHS CORPORATION 


COMPUTER SYSTEMS GROUP. 


SANTA BARBARA PLANT 


— ARITHMETICS 


ADOT TION © 
“SUBTRACTION | 
“MULTIPLICATION 


-DIVIS TON 


 wopULG : 


syntax? ADD 

sua 
MUL 

DLV 


MOD 


Format: 


ADD sua” 


Akhkhkkkkeek kk&k& kkk kkkh 


# 1011 O1 * * 1011 10 * 


kkk kkk hkk&k&kth =tkhkkkkhkk kk ih 


O9P-Code OP=-Code 


40D 
kk eke ek eke hehe 
 # Vili 00 0111 « 
kth kkk kk kk hh keke 


OP=Code 


MUL 


kkekhkk&hkbk&kk thik 


* 12111 00 0101 «. 


kkkk heh kh hk kktakh 


OP-Code 


ea 


COMPANY CONFIDENTLAL 
81800781700 SOL S“LANGUAGE . 


P.Se #2201 2389 (L) 


kRhkhhkhkhkhkktkk kk kk 
* ADD * SUB * 
kRkehkkkkke kk ik 
* MUL *« DIV « 
aka KkKKkhKkhkKh kkk 
* MOD «* & 


hitkhkkkkaekkik 


Orv 


tkkekkkkkkkkkhke 


* 1111 00 OL1G « 


ek tkk kk keke kk kkke 


OP-Code_ 


 auaRuUGHS CORPORATION cg PANY CONFIDENTIAL 


COMPUTER | SYSTEMS GROUP Ae tae Oe BLODCsBL 700 SUL S“LANGUAGE 


(SANTA BARBARA PLANT wie tao So AGE oie B+ 8z201 2389. a 


| Function: 


as Two operands are expected on the EVALUATION STACK. 


le The bottom operand. is considered to be or the "left" 
side of the operator. | ee er i — 


2. The top operand is considered to te on the "right". 


be The arithmetic operators ers 24- bit weae neste. on two | 
eS eyorandss These PPE range: mar be Of any, data tycee | | 


ee Sign analysis wilt onty be done af both operators are of — 
: type FIXED. With any other data type combinationse the 
magnitudes of the operands are evaluated» | 


de For bit and character data» if the field is greater than. 
| 24 bits»e only the low order 24 bits will be evaluated. 
When the field is Less than 24 bits» zeros will be 
supplied on the left. | | | | 


@e oth operands are cut back. 


f. A 24 bit setf-relative result is returned to the EVALUA~ 
io TIGN STACK. When both operands are type FIXED» the 
result witl be type FIXED. Ir att other instances the 
result witl be of type Q1T. — a | 
ge ADD performs integer addition (+) — 
SUS perforas integer subtraction (-) 
MUL performs integer multiplication (#)— 
DIV performs integer divisior C4) 


he DIV results in an integer values Any remainder is trun- 


| 
N , a 


17/8 = 


tt 


ia 


“7/3 = -2 


“ag BEE 
ABBEY OHM 
aad 


3e7 


“BURROUGHS CORPORATION =———~S—SCS:S PANY. CONDE TEAL 


COMPUTER SYSTEMS GROUP : - -_BL8OO/81700 SDL S“LANGUAGE 


ere BARBARA PLANT : | 7 | P.S. #22C1 2389 (L) 


Te The 400. soeration is division resulting in the integer 
 watue of the remainder. It ts evaluated by the following 
formulas | @ -* | 


yY 4UD Z = Y"COV/Z)# 26 using integer value of he above 
Eon, exasole: | | 


7-€07/3)%3) = #1 


7-00 3 = 
-7 MOD 3 = (-7)=CCC779/39"3) =o 
3 MOD “7 = 3-CC3/CHTII*CH7)) = 3 
<3 MOD “7 = C=3d- COOH SI/CHTIIRCHTID = 3 


Note that this is NOT the same as the convent ional math- 
ematical definition of MaD. 


28, Seb 


 WURROUGIS: CORPORATION 8 = ~=~————— GG PANY CONFIDENTIAL. 


COMPUTER SYSTEMS GROUP  RL8O97B1 790° SDL S*LANGUAGE 


| SANTA BARBARA PLANT - a eee ee ae Bioeee 
CONVERT. To BINARY 
kkk eeee 
* BIN & 


hk hee ke he fe 


Syntax: BIN 


. ie 


-ormat : 


kkk kkk kkk kk REE 
—@ 2111 10 LOL ® 
Rea KKEKKEKRKKK KKK 


UP-Code 
Function: — 
de kn operand of one CL) to eight (8) characters is expected 


on the eat a EAEN 


be These characters are assumed to be numeric decimal digit. 
_ characters. | 7 


ce The characters are treated as the decimal representation 
of an unsigned integer and are converted to the corre- 
apo nga Ng for 24-bit binary number. 


ds A set f- relative descriptors of type BIT is left on the 
| EVALUATION STACK with the pnaey: Malues os | 


ee 


~—6Synt axs 


Format: 


369 


‘BURROUGHS CORPORATION =—t*” — COMPAAY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP) —— - BLBUD/BL790 SOL S-LANGUAGE — 
SANTA BARBARA PLANT) _ e by aa | PeSe He2GL 2389 CLI 


CONVERT TO DECIMAL. 


Ahkkhk kite 
*# DEC «. 


- wha K 


DEC 


kRkRRKEKKEKE KERR 


# 1111 19 1000 « 


Ge 


kkk kkk hk kkk kkk 


OP-Code 


Function: 


Two operands are expected to be on the EVALUATION DEEN 


1. The Rope eoanads should yieke a value of zero C9) to 


eight (8). | 
2. The sadiotadanene oneal be 24 bits ae 


a) If less than 24 bitse zero fill is provided on. 


b) If more than 24 Ddits» then onty the tow order 24 
bits will be used. | eb 


The ¢c4-bit value is assumed to te type BIT» 1eQer 
unsigned. , | 7 Be Se a? i = 


Both operands are cut back. 


Depending upon the value 0 f the tap descriptor on the 


EVALUATION STACK a 1 to & character result is left on top 
of the EVALUATION and VALUE STACKS. These characters are. 
the decimal representation of the 24- bit vatue. | 


Leading zeros in the result are not changed to blanks. 


‘Ne 


ne oaTE 


Syntax? | 


ey ee ae eel SA Ne Bea 

 guaravens: coneorati¢N COMPANY. SCONE-LDENTI AE. 

COMPUTER SYSTEMS GKOUP : 
SANT A BARBARA PLANT: ee ee a aes Se #2201 2589 MEE 


| TTT TTT ae 


e NEG # 


kkk kkee 


NEG 


Format: 


kkk iki th thek hi kh 


ae LLL 


RRR RR RR 


GL ObAL # > 


| gP-Code 


Function: - 


this operator ‘pops. an ect cane off the EVALUATION STACKs, © 
- negates itr and pushes it tack’ on top of the EVALUATICN — 
STACK as a FIXEDs> set f- relative result which is the twots. | 

complement of the coceanes ‘a ok 


- dperands. of any type other than FIXED are treated as_ 
_ ~FIXEO. 7 a a aes ee ere a ig gas 4 A ee a 


ee a eee items. ehonten than z4 bits are padded on the. 


tett with zeros. Ode 


(Qe Data items ‘longer than. 2h Dies are. left truncated ang 


treated as. FIXED. | 


Bieoose1709 SOL S-LANGUAGE 


Bt 
‘BURROUGHS CORPURATION | BO PARY CONF LDENTLAL 


_ COMPUTER SYSTEMS GROUP BBG NZBL7G0 SDL S@LANGUAGE 
SANTA BARBARA PLANT — on P.S. #2201 2589 CL) 


REVERSE ARITHMETICS 


|. 
| k$hkkk&h kkk kik kk && 


* RSUB & RDIV « 


kKkKkkkkkkhkkhk kk 


& RMOD « | a 


Rha h kkk kehkkk kkk & 
Syntax: RSU# 
RD Iv 
RMOD 
Format: 


RSUB RDIV Rap 


RekhhkKK RAKE AKER kath kk he ek kkk Kea RRARKE AREER 


 @ LILLE £0 LEGO ® © LLLL 29 LEOd © © LLLL 10 LLLO ® 


REKKRHRKREKKE KKK KEKKKKKKKK KK KEKE kkeKkKKKKKKKARKKKEK 


uP-Code  GP-Code OP-Coce 


“Functions 


ae These operators perform the same operation = as their 
corresponding “forward” operators. The only difference 
is the order of the operands in the EVALUATION. STACK. 


1. Reverse suptract: The second oper and in the EVALUA- | 
 TIGN STACK is subtracted from the operand on top of. 
7 the stack. | | 3 . i . 


2. Reverse divide: The sececnd operand in the EVALUATION 
STACK is divided into the operand on top of the — 
stack. » «= & ¢ “9 F Ge 7 | 2: 


te Reverse modulo: | The second operand in the EVALUATION 


— STACK is divided into the operand on top of the stack 
tc cbtain the residue. pos | ae i. OS 


*  guaadueHe: CORPORATION 
Gs “SYSTEMS | cRouP 
en ‘BARBARA PLANT 


COMPUTER 


: a ty 


EXTENDED 
EXTENDED 


EXTENDED 


 EXTENCED 


EXTENDED 


RD 
SUBTRACT 
ema 

O1 y : DE. : | 


MODULO — 


a ee ee eee es DEE Bk! 


anpaanee 


x400- 


 XSUB 
XMUL 
XDIV 


aT 1) eee 


pe ead 


ra CUNPAKY (CONFIDENTIAL 
o1e9esa1700 ‘SDL S"LANGUAGE - 


P. Se #2208 25e9 behest 


OP. cope ae. ARGUMENTS: 


tenes ae ou 
7 ELLE LL AtGo 106 


ALLA tL 2190 LoL 


“ALLL 11 1106 110 © 


AMLE 22021000 1212, 


| | 3-13 
"BURROUGHS CORPORATION — COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP B1accsa1700 SDL S-LANGUAGE 
SANTA BAKBARA PLANT — oo gg BE ae P.S. #2201 2369 (Ld 


EXTENDED ARITHMETIC OPERATORS 


Syntax: XA40N 


 XSUB- 
YXMUL 
YDIV 


XMOD 
Format: 


XADD. 


STTTTETTTTTT TAT Te TTT 
* Lith 11 1190 oll * 
REKRKEEKKEKRKEKRKKKEKK KKK 


OP-Code 


XY MUL 


kkk hhkhkk kkk tkkkkkhk 


*# 1111 11 1100 101 * 
kkk kk kk ek tk kee kee 


GP-Code 


XxMOD 


wh eke kek hee ke 


#1111 11 1100 111 * 


kKkeerak kak ek hk kkk tkhe 


— OP=Code 7 


-XSUB 


fe kk kk ek kk kk kk kek kek t 


* LLLL tf L100 100 * 
kkk Kt KKKKEKKKRAKKRKEKREKE 


NP -Code. 


XO1V 


k$kkkkkikkkhkk&hkkkaekh kk t 


# 1111 11 1100 1190 «| 


Rkhhke hk tkkkkkhkikkkkk tk 


QP -Code 


kkk hkekkk kkk khe 


# XADD * KSUB «& 


KeREKKKKKKEKKKRK KK 


* XMUL * XDIV # 


&Rte&hkhe kkk kktkk ke kkk& 


* XVOD te 


wkkkk kiki kkkk kh he 


wunroueHs: CORPORATION ee COMPANY. tt atin aioe 
COMPUTER SYSTEMS” ‘GROUP gy ae0ye1790 SOL. S*LANGUAGE 
— SANTA BARSARA- PLANT Mei, eres arn 4 P. Se We201 2389) oe ae ae 


| Function? 


ES EOE 


The operands are pooped from the EVALUATION STACK and the 
indicated Oper ae ren as peter ed: an the operands. — | 


a ee ee strings. 


the: peaert petunia wnt ehen Cop et the EVALUATION STACK is 
non self-retativer type ae ? 


“Gedichlianbgeli a 


oe. if the two. operands are of Witter on -aensene os eas 
| eee ‘Shorter is padded on the left with Binary: zerOSe i 


ee The tenath of the gaya recone wil be equal to o the, 


mengen of the eee Pperanes 


“ Hultiplication — 


4. The Length of the product will be the sum of the 


lengths of the two operands. 


. DivisionsModuto 


a. The - hal the result will be the Length of the 


dividend. 


2. For the Modulo operators — the dividend must be non- cs. 


self-relative. 


BURROUGHS CORPURATION — 
- COMPUTER SYSTEMS GROUP 


SANTA BARBARA PLANT 


—. OR 


EXCLUSIVE“UR 


NOT 


MNEMONIC 


AND 
OR 
EXO 


NUT 


Pade 


Ze 15 


_ COMPANY CONFIDENTIAL 
816997281700 SOL S“LANGUAGE 


#Z2G1 2389 cL) 


 guarauen 


 tacreaL OPERATORS 


ee GHS” corporation 
COMPUTER SYSTEMS. eat 
SANT AL BARBARA, PLANT 


2 “y.e0ayet 700. Sol 


oe co my « Je 


thik kk kik eh kt 


Khekkkhhhh ek he 


COMPARY. CONFIDENTIAL 
S“LANGUAGE 
heat 2589. ee 


ec er et 27. 2 2) 


* AND * EXOR « 


© OR & oe oe 


Formats| 


“AND 


eevaatiiite tat: kkk k& 


*# 1111 60 Q001 * 


tit kkkki kk kk thee 


aR 


Kk kh ak ka kk hk 


oe L111 hem 99053 * 


kKktkhh kh kk kkk th 


 EXOR 


Rethkkkkkkk kk kk eke 


* 1111 90 9010 * — 


kKkkkkihkhkhkki hee 


— OP=Code © 


— OP=Code - OP-Code 


Function: 


"NOT" 
| other logical operators expect two operands to be on 
Wen wiaeabin 


bit ty bite. 
are af 


The Length. ‘of the reste ae 
The two operands: are 


. lative. a 


ff the operands have equal 
operand 
_ the second operand. 
— not trues 


is unary. oper ator. and. as explained separately. 
the 


EVALUATION STACK. 


reqardtess eee iene. type> 
starting from the right. 

unequal | 
teft. with se 


hen the operators © 
tength the shorter cne 


the tonger . 
tae ere 


‘the length of” 
operande — The result is. selfrrelatives ~ 
ices le are self-retative. 


e cut jack teow the “EVALUATION 
and oe result is pushed onto the EVALUATION STACK. 
is of. Evipe: bit. it both. Roernae. are sel f-re- 
If the tengths of the operands are not — 
the result will be the type of the. largest operand. 
‘lengths and (af the secona 
is on the value stack» the result. is the type of | 


Itie result. 


then. 


the result is Ates type of. nes first Pp er ans: 


ALL 

‘are operated upon 
is padded on the 

STACK 


equal> 


Lf. either of the two conditions are 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 


SANTA. BARBARA PLANT 


‘Losreat KOT 


Syntax: NOT 
Format: 


eRe ke hk kkk 
* Lill 00 LOLL « 
REKKKKEKERENKRKKK 


OP-Code 


Function: | 


yee 


COMPANY CONFIDENTIAL 


3-10 


81660781700. SUL S“LANGUAGE 


P ede 


#2201 2389 oe 


fit tk tt 
* NOT * 


kRhkh kkk t 


ae This operator expects. one ‘operand to be on the top of the 


EVALUATION STACK. 


be The result is of the same type and length as the operand> 


but each bit representing the result vatue 


is the one's. 


complement of the corresponding bit of the operand. 


Co. If the operand 


tive. 


is sel f-relativer 
relatives otherwise 


| the. result will be. self- 
the result will be non- self-rela- : 


— gurecusas ¢ CORPORATION Seat: Pe ete COMPANY. “CONF IDENTEAL 
-. COMPUTER SYSTEMS | GROUP 2 ee 81805781790. SDL S*LANGUAGE = 
SANTA B BARBARA PLANT. ae ea ee Pe Se M2201 2389 hone 


STEN OPERATORS 


Ne wer Ee Ee ee ee 


ee Soe wNENOWTE Pc cube 


(— coNcatE Ware Son eg aces ee 8 Ss eas, § 


suns FRING ONE Sek ALL AE 9100 © ToWeQet 


suas TRING Tw $82 AAA 00 10600 Tow 


| SUBSTRING THREE. -_ 885 note OO Te 


QURROUGHS CORPORATION = = =—————SsS—SsS PN “CONFIDENTIAL 


SrAa 


«COMPUTER SYSTEMS GROUP | «81899781700 SOL S-LANGUAGE 
SANTA BARBARA PLANT ~ | Pe Se F226 2389 CL) 


“STRING CONCATENTATION 


kkk kkk 
* CAT « 


kKkiehkhk hh 


Ahk &hk&kk tt t 
# £100 L1 * 
kee KKKKAKK 


OP-Code 


Function: 


This operator pops two operands off the EVALUATION STACK 


and generates a new descriptor that descrites the concat = 


entation of the two strings. The nextcto-top operand. 
must be nonwselfr-retatives name-value bit on. 


| 
i 


When the source data items are of type CHARACTER» the 
results will be type CHARACTER. 


: | 


cae other data type combinations will cause the eeeuct to. 


be of type prue 


 gureaucHs: CORPORATION. RNS A Men “CONPARY. Y CONFIDENTIAL 
- COMPUTER SYSTERS. ce our. yee? BLe2078L 700° SOL S"LANGUAGE 


“SANT& BARBARA PLANT. Pee, eee — PaSe #ER0E: 2589 APES 


- suesTREKay ‘ONE. PARAMETER At 


Rk 


“#581 


eek ee 


Syntax: <String Type Bit><Load Type Bit>. 
| | <uUffset><Length> tg 


Format: 


: ' TOI ti kg hk fe cc ki kkk ehhh ek th FERRRERR ERA KERR RRR 

w* PLil LL OLOG *® # ie fe, * | ete a 
ReKKKKKKKK KE KERR RE RK RR KEK ih PI EI RR ER es 

OP- Code . = & re & 

7 | | | a | 

eee 6 or 17 Bits a 
SPeeae eee | 


> ee Me ee 


ae 6 or 417 Bits. 
| Specifies offset 


+ eR te RR RR 


te 1 Bit 9 = Load Address 
LS Load Value- 


ee 


= Length in bits. : 
Length in character 


» 
» 
ine 
_ wade 
ee oe 
& 
Hoi 


The Uffset and Length fields are encoded as follows: 


| aioe ke, eis. first. bit in these fields is equal to (0) then 5_ 
Pade 1S follow. Se oe ag wie ¢ a en a rr te 


Ge eer eee wh Pee ne ota erey 
bits follows — : Wee & a 4 eg 7 
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| Functions 


This operator functions the same as $33 except that the 
offset and tength fields are iterats which follow 
in-mliner rather than values on the EVALUATION STACK. 


BURROUGHS CORPORATION ee ee Ce a COMPANY “CONF IDENTA AL. 


| COMPUTER | SYSTEMS. GROUP. 


SUB=STRING® THU, PARAMETERS 


Syntax: 


Format: 


kk hk kk & & 
* SS¢ « 


he te te te tee he 


$5? <String Type Bit><Load Type Bit> 


TORR Ro toi tte ti tok tie tet tok tk te 


mig Dg: 


P= Code 


Function: 


Two 


90 1000 * — & tk 
AeA KARKKkKEKMK KK FASE Eee kk th kh t 
& e 
& & Z | 
tex | bitsy G = Load Address 
& | 4 Ll = Load Value : 
- pe aa 
keke LT bite» 9 = Length in bits 
| ~ 1 = Length in characters 


: ‘operands are expected to be found on the EVALUATION 
1. The top operand is the offset in bits or characters 
of the substring from the teginning of the string. 
If longer than 24 bits» only the tow order 24 bits | 
are used. | 4 | ? me | 
2. The next operand. is the string. It may ie of any 
type. If the operand is selfe-relativer then it is 
torced to be non mselfrrelative. if load type bit is. 
Ge then it must be an address (i.e. mnamervalue bit 
off). | <7 i; , | | | | 
The. two operands are then cut back. and a result ve cots 


on the EVALUATION STACK. F. 


ae oe 


Types 


a » “String type. bit = 0 then bit. 


| BON TB17O0 SOL. S“LANGUAGE 
‘SANTA GARBARA PLANT aie! ft s. Mie P.S. #2201 2389 (Ly 


| | (3-23 
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COMPUTER SYSTEMS GROUP | | B1800/81700 SDL S“LANGUAGE © 
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String type bit = 1 then character 


b) Load type bit 


0 then address 
load type bit 


1 then value (self-retative 
af tength is 24 bits or less) 


Hou 


2. Length: 


a) Length is equal to the wie Length of the string a 
minus the i | 


5s Address: 


a) Load tyre bit = 9 then the address in bits is- 
equal to the old string address plus the offset. — 


b?) Load type bit = 1 then the address is the adaress 
of the VALUE STACK if the substring length is 
greater than 24 bits. | | | = 


1) If the load type bit is set and substring — 
Length is greater than 24 bits» the substring | 
is. loaded to the top of the VALUE STACK. | | 


2) If the load type bit is set and the substring 
length is less than or equai to 24 bits the 
substring 1s toaded right justified into the . 
address field of the top of the EVALUATION °- 
STACK. | 1 2? 


4. When the offset is. greater than the Length at the 
strings an error interrupt OCCUFLF Se 


— Syntaxt 


- sus-sTiING, 


$S$3 


Format? | 
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SANTA BARBARA PLANT boa cw oe as Rao acer 2389, ges 


THREE PARAMETERS 


eke 
 f& $55 * 


kkhtkkhk 


<String Type @it><Load Type Bit> 


tke kkk kk ek kk kh kk &t ae 


* 1910. ad - 


kkk kkk th tk TOeTeT TTT TTT eT a 


oP- moe: 


‘Function: 


ee 
te te : | = | | 
eee LD bite O = oad: address 
rr ne a load value 
i oe Z ; | 
& 
* 


eee 1 bite 0 = Length in bits. 
_. aee py MENGE in characters 


aie: operands: are expected to be found on the EVALUATION : 
vores oP ss ; 


The “ae “aa ccaad 15 re Length. in bits, or characters 


of the substring desired. 


The ‘second operand is the niece: in bits or charac- 
ters from the beginning: of the. AEG Ings ie ae “a 


| The third. onan as ‘the: eepinae tt may be of any 
-typee If the operand is self- celatives then it ‘qs 
forced to be non~self-relatives | If toad type bit is 
Q» then it aust be an address (ister namecvalue pit. 


off. 


‘three. anerenae are cut ‘back and a result is left on | 


EVALUATION STACK. | 


a) Seri aa: type: bit. ie then tit “String type bit Sie 


‘then character. 
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4e 


G then address | 
1 then vatue Cself- relative . 
if tength is 24 bits or less) 


b) Load type bit 
toad type bit 


nS 


2. Lengths. 


a) Length is equat to the Length of the string minus 
the offset. | 3° pe og SG a 


bp) Address: 


ad Load tyre bit = G then the address in bits is 
equal to the otd string address plus the. 
offset. : | | : | 


b) Load type bit = 1 then the address is the 
address of the top of the VALUE STACK if the 
substring length is greater than 24 bits. 


1) If the toad type kit is set and the 
substring tength is > 24 bits» the. 
substring ts loaded to the top of the 

“VALUE STACK. : oo er 


2) Lf the toad type bit is set and the | 
| substring ts loaded right justified into 


the address field of the EVALUATION 


When the offset plus the length is qreater than the | 


‘length of the strings an error interrupt occurs. 


— guRROUGHS | CORPORATION nes 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


2 SR AD UT RED nite 


NAME ri a  MNEMONTC 


“store DESTRUCTIVE. oe) SOO 


TURE. NON-DESTRUCTIVE LEFT © SNDL 


«STORE NON-DESTRUCTIVE RIGHT SNOR 


cpa Y CONFIDENTIAL 
| miavosat700 SDL S“LANGUAGE 
- (PeSe #2201 2389 ry 


oF cope ARGUMENTS 


ie, 3 | 
‘L010 1k 


- LLli 00 9100 
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STORE NONWDESTRUCTIVE> DELETE LEFT 


Synt ax: 


Formats 


k&hkkkkkk& 


# SNDL « 


kkkkkkht 


SNOL 


ek ekkakak RRR 


* 10106 11. * 


ahkeaehkk&k&k kkk 


OP-Code 


Functions. 


ae 


This operator pops two operands off the top of the EVAL- 
UATION STACK. | 7 3 gb 4 | | | 


The top (destination) operand must. be non-self-relative. 
and the name-vatue bit wust be off» ieee» it gust be an © 


address. 


It then copies the data described by the second (source) 
descriptor into the Location descrited by the top (des~- 


tination) descriptor. 


When both ‘the source and destination fields are of type. 
CHARACTER» the data will be left justified in the desti- 


mation field with either blank fill or truncation on the 


fe 


righte. 


Any other sourcesdestination field type coebinations. 
yield right justified data in the destination field with 
either zero fill or truncation on the left. This allows 
for type conversion and length truncation. — | | 


The source descriptor is then pushed tack on to the EVAL- 


UATIUN STAC 


 gurrovens. CORPORATION. = COMPANY. eee ee 
COMPUTER SYSTEMS | tile uae SOL S~LANGUAGE 
SANT AS BARBARA | PLANT OF wet el See thee Baas 42201 2389" Cy 


“Syntax: 


Format: 


store NOW-DESTRUCTIVE® + DELETE RIGHT 


kkhkk hike 


* a SNDR eo oo * 


 tkh hh kkk 


SNOR 


ARK aKEKER EE ee 
® LELL 90 9100 « 
kk eek kk kkk hkkk 


GP-Code 


Function: | 


this, operator ‘pops two operands off the top of the EVAL- 
UATIOW STACK a ae 


The top (destination) operand aust be noncself-relative 
and the name-value bit gust be offs teee» it must be an ~ 
address 7 | 7 7 bs 4 | 7 rr a 


it then copies the data described by the sétend Gscuwcera @ 
descriptor — into the location described by” the top oaeen: 
- tination) descriptor. , 


When both the source. and destination ‘fialds are of type 


CHARACTER?» the data witl be left justified in the desti- 7 
nation field with either blank: File or truncation ‘on ane 


ae a 


| a elee 


in other ‘sourcedest ination field. type combinations — 
yield. right justified. data in. the destination. field with | 
either zero fill or truncation on the teft. | This allows - 
for type conversion and. _tength truncations | | 


The destination ‘descriptor: as then pushed ‘back: on to the 
top of the EVALUATION. STACKS : (This is the. only differ: 


a ence as 
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STORE DESTRUCTIVE 


Synt ax: 


cKktkkkhe 


« STOOD * 


kRikkkikke 


STOD 


Format: | 


a? 7.727 7 2 


* 0010 * 


ReEKKKRKKS 


 OP-Code 


Function: 


This operator pops two apieends otf the top of the EVAL- 


UATION STACK. 


The top ‘Cdestination) operand aust be non-self-relat ive 
and the name-value bit must be off» Toeeor it must be an 


_ address. 


ds 


It then copies the data described by the second E<sureel 


descriptor into the location described by the top Cdes7 
tinat ion) descriptor. | — 


When both the source and destination fields are of type. 


CHARACTER» the data will be teft justified in the desti~ | 
nation. field with either blank fitl or truncation on the — 


right. 


Any other source-destination field type combinations 
yield right justified data in the destination field with. 


either zero fill or truncation on the left. This allows. 


for type conversion and length truncation. — 


8 ADD 


cons TRUcT 
cons TRUCT 
CONSTRUCT 
— CONSTRUCT 
| CONSTRUCT 
‘DES. 


“cons tauct 


CONSTRUCT DES. 


- & MULTIPLY 


- CONSTRUCT DES. 


CONSTRUCT 


CONSTRUCT DES. 


DES. BASE ZERO 


DES. 
DES. FORMAL A 
DES. 


DES. 


FROM PREV. 


DES. 


— qurroucHs CORPORATION | 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT =~ 


eau 


om ne me eh 3 


Locat DATA 


poe CHECK 


FROM PREV. _ 


FROM PREV. | 


LEXTC LEVEL 


REMAPS — 


DYNAMIC. 


hie ¢ 


coLD 


 CDFM 


coOFc 
cope 
COMP 
cont 


CORN 


cDDY. 


COMPANY: 


or cOoE 


P. ver: 


yen 


LALO 


1111 


aha 
an 
1110 
1111 
1111 


meres 


gana 


. 
ol. 


lL 


io 


10 
10 


11 


an 3 S500 eee 


2 Sea ge ce 
— mte0072t 90" SDL S“LANGUAGE 


#2201 2389 PLE 


ae 


ARGUMENTS: 


OEScRLPTOR 


en lie DESBL sees 


000 


o10L 
oold 
ite 


1110 coo 


DES4n- 


LL 


‘Disks DES#L> aeeDP 
| DES#n oe 7 


No» DES#1+... or 
dail - 


= N» DES#1> se. a & . 
| DESEn | ice 


- N» DES#1> ae oS 
| DES&n. | 


| “TyPE-Lt-0ce 
DESCRIPTOR 


DESCRIPTOR 


“TYPE 


BURROUGHS CORPORATION | 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


CONSTRUCT DESCRIPTOR PREVIOUS and ADD ~ 


«COMPANY CONFIDENTIAL 
81600781700 SDL S-LANGUAGE 


3-31 


P.oSe se20l 2389 (L) 


tkikkkket 
* CDAD *. 


kh tht & hk 


Syntax: CDAD <# Descriptor s> <Descriptor><Descriptor>... 


Format: 


RRR AEKRRRAKR AAR 


# LLLO OL * i a oe ee 
AREER AERA KERR RERE KE Kk | 
OP Code i & fe 

. & kRkekkh kkk 
* * 
& | & | 
« eee Deserip torres. 
kk 
& 
x 


kee 5 Bits 


variable size 


(See incline descriptor format) 


Specifies nuaber o f descriptors 


Function: 


ae The nuaber of descriptors indicates the number of | 
descriptorse These will be used ta build descriptors on 


the NAME STACK. 


be. The descriptors may be simple or arrays 


ce. The address portion is generated from the “filler” 
in the descriptor and inforrgation from the previous 


on the NAME STACK. 
de The following formula is used: 


At = AtL#F 


1. At - is the new address part. 


in-line 


field 


entry 


2. Ae ee ts the address part” of the. previous descriptor 


12 eestial CORPORATION eas Gi “COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP =-—~S*=é«S BLO SOL S-LANGUAGE = 
SANTA. GARBARA PLANT a Pa Se #2201 2589. Pts 4P 


ee 


“generated on the NAME STACK. — 


Senko as the. Length. part of the previous descriptor. 


ee Oe the “fitter” field in ‘the descriptor if. is. 


presente. 


The aierscee:: must be able to. find the ‘aadhess. part of the 
previous entry whether it is a ‘Siaple or array 
descriptor. — oe a . | ee 


The new and previous descriptors cannot be paged array 
descriptors. - e ae ae a r fs eGu: 2 of ie 
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COMPUTER SYSTEMS GROUP - —--BR8OO/81700 SDL S“LANGUAGE 


SANTA BARBARA PLANT = PAS. #2201 2389 CL? 
CONSTRUCT DESCRIPTOR BASE ZERO 


w&ketkkaentkntk 


*« COBZ « 


kkhki kh hh 
 Syntaxs —c0Bz <descriptor> 
Format: 


AHKEATREREKEREEERHEE ERE EE 


® LLLL 10 0100 « oe 


RERARKEARERREREEKREKRKEAKREKREKE 
~OP-Code | & 


& 
& 
te te te Descriptors variable $1ze 
(See in-line descriptor: format) 


Function: 


ae A descriptor ts enucates: on the NAME STACK with zero (0) 
in the address field and other fields speesired. by. this | 
eos descriptor. 


be Paged array descriptors are not allowed... 


| 


: wn = _ ; . i | A 


Format: 


ooo ee ee ee ee Lo Denes rt eae 

- guraoucus « CORPORATION | (oh aa COMPANY CONFIDENTIAL 

COMPUTER SYSTEMS GROUP es *< hs 2 /91000/81700 SDL S*LANGUAGE 
SANTA BARBARA PLANT) S- 2200 2se9 cL) 


cons reuer DESCRIPTOR jaae< : 


hee anes 
*« CODY « — 


_ wk kke kk kk 


CODY <Type> 


Beevetetstresiee tet ret ities es 


# LLLL LL 1210 000 © | . 


EE EE REE Ra Re eee 


OP-Code. a Se, ts 
ra re ae 
ee - we | 7 | ee 
Pe. bits specifies type 
(See type field of in- epne 
descriptor foraat) 


— Function: 


7 ae 


This. dderat on Ronet cuces deccripeors: for dynamic. arrays 
and dynamic coh@Pacter: SLE ings: or bit strings. a ; 


the type field follows the cp” code» but the length and 


nuaber of entries. wilt be - operands on. the EVALUATION © 


Ce 


we 


‘The ‘aeacr bese wilt be area as. non-self-relativer cande— 
if. apeare will be marked contiguous. _ | 


The procedure to build ‘the descriptor is as follous: 


io ‘The type field is “placed in ‘the NAME. “STACK. | | 


Be. The type field is tested for. “simple or array type. 


3. For simple items: 


ce Ao: 166s Length. is the only entry hula! EVALUATION 
STACKS | 4 | 8 


px The-Cength ¥8-poppee. chi: the EVALUATION STACK and 
a nates an the NAME STACKS | et st ag 
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c) The VALUE STACK POINTER is used as the address. 


4a 


d) 


F o¢ 


a) 


b> 


c) 


d) 


e) 


f)> 


The VALUE STACK POINTER is updated by adding the 
Length to ite. | | 


array iteas 


Length and nuaber of entries will be in the EVAL- 


UATION STACK. 


The Length is sapeed off the. EVALUATION STACK and 
placed in the NAME STACK. 


Length between. aneeies is the same as Length. 


The number of entries is. “papped off the EVALUA- 
TIGN STACK and placed in the NAME STACK. 


Ihe VALUE STACK POINTER is used as the address. 


The VALUE STACK POINTER is updated by multiptying — 


the nusber of entries by the length and adding 
the coset to ae VALUE STACK POINTER. 


Bs 


-— gurRoucHS CORPORATION ites a sae COMPANY CONFIDENTEAL 
COMPUTER SYSTEMS — GROUP  tteoasttt700" ‘SOL S- Sree a 


-covstnuer DeseRreToRe FORMAL CHECK ben a 


ckhkkhhhke 
« COFC *— 


occ os 2 2 oe 


Syntax: CDFM <Lexic Level><#Descriptors> | 
=. #4 «* <Descriptor><Descriptor> «sees 


Format: 


| Srreetertrsttistcititet etter et itt tit tte tat t itt iti t tet it et 
-@ 2LEL BE 1101 000 © © @ it om 
t Fenn e ne een ene ke te nen eee ke Rene nheeee ee ee eeneenetebeekenee | 
RPGR Es Be 
_ = ” tee eek eh eee 
a | ss 
i fe 3 : | 
a ee 2; - Descriptors> Waa le: size . 
# - (See ine line descriptor format) tm 
Rn | 
* 


& 

& 

& 

* 

x 

re a , 

an keneeen Bits, eneeeties the Vaatets 

& of 48 bit entries. expected on 

* _ the EVALUATION STACK. 

_ | | 7 

 k&kkkkkkkkek & Bitse specifies the exic Level 
ese cto. be wade ae oe 


ae Oescriptor | ke#k&ekkkaktkkktekenee 
ge ae 2 RE a ge Pee ge 
kkkkhkkhe hee hekhke 
ik 
kkkhhkhh 
a 
TYPE FIELD. : 
EEE EERE RETR ERE REE RE 
* 0 * J & en ee ee 7 en 
WIttTTertrrrrretetrrertrerrt ae + eo. 


PO PN 2 EW BB My 
cee 

oo. = Always L 
2st array, then 1 rn 


Se If. array then > “specifies that length between = 
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“BURROUGHS CORPORATION = = = COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP < -B1800/81700. SOL S“LANGUAGE 
SANTA BARBARA PLANT _ .¢ 3° es PoSe e220 2389 eh 


entries is equal to ewe length of entries: 
4e5 = 00 BIT ao 
O1 FIXED 
10 CHARACTER 
‘11 VARYING 
6 = If array bound varying then I 
7 = If Length of data varying then IL 


L = Length field - (6 or L7 bits). Appears. 
only if type bit 7 is equal to zero (0). 


€ = Nusber of entries for array = (6 of 17 bits) | 
Appears only if type bit 6 = @ and type bit 2 = 1 


Depending on the conditions in the type field» different fields. 
appear in the inwline descriptors OE 4 | 


Kind Array Ad 


Simple - CS) 
Length varying  £(LV) 


Array bound ee CAB) | 


THENS 


KIND LY ABV FIELDS THAT APPEAR 
kAEAk&k& kak kk ke ke kk kk kh kh ha kk ak a&t Kk k&ektk hk kk kh kkk Ke KEE E 
« § * FALSE * “w= 6 6 Je ; L : s 
ARERR EE RENEE EEE EE ER RR Ee 
# S$ * TRUE & ere & fF | | * 
RaREREEEEK EEE REEEEEREEE EERE KEKEEREERERAEEREEEKE 
x A « FALSE « FALSE « Te Ll» £ fs 
kee EERE ARERR EKER EE ER ERE ERE EE EKER EERE he 
f@ A  #* FALSE * TRUE. * | Te L | & 
te RERREREER EERE RE EE RARE ER ER RRER EERE RE RE RE RE RE 
« A « JRUE «* FALSE * To | £ 3 
RRR RERERE EERE REE REE RERERERERE EERE RRR Ree 
* A w» JFRUE #« TRUE *« J | : , ft 


*&* &k& kt kar &k kkkk&kk& th khehek k&trz kk se nneaneneeeneenenne 


Function: Refer to CONTROL STACK techanise 


ae CSENTEREDLLCCSP*L) = CURRENT.LL s= LL3 
| DISPLAYCCURRENT.LL) 2= CRESS NSP os 


“BURROUGHS CORPORATION Dl ia ateat eee aee COMPARY. cette” 
COMPUTER SYSTEMS GROUP on eee B1800/81700 SOL S-LANGUAGE 
SANTA. ‘BARBARA. PLANT | leg ag te ae Pee. 2201 2389 ye 


Case. 


Ca praviousty executed WKS has | ‘initially, ‘set up, 


CONTROL. STRCRE GEE IA: 


a Since the ‘tormat. Pataeecene: have. not ‘been put: on the — 


NAME our CURRENT.NSP. has not yet been bueped. 


: ° Waseoneore for the set vad parameters are expected to De: 
“on ne: EVALUATION STACK. a | | | | 


_— The desesd prone: in the. instruction are matched to 
descriptors itn the EVALUATION STACK» — starting with the 


fast descriptor in the EVALUATION STACK and. “watching: AC . 


with the first descriptor in the. instructions 


The descriptorss after comparisons are loaded to the NAME 


STACK. The EVALUATION STACK is cutback. The VALUE STACK 


Is unchanged. 


hen array ‘bound. varying is enue. to L the array bound 


ts taken fro the actual oaranmeter. 


aihen: Length varying. 1S. ‘equat to re ene dene eh is taken 
 froe the onan patiames cr i es a ne 


When. the ieee Ptveen is s vatyinge the data type is taken 
from the Beruae. Dar seeheneadr os. a ee a Te ae ee 


| When an array the aeeaat array. aweed: not be | contiguous. | 
if it is» the formal and actual. parameters must match 
pe ee a I f there is ae mismatch. an error interrupt — 


ocCur Se 


- For. “paged arrayse both the paged arcay bit and the page 
subscript size Rust oe. copied. ; | | 


a7 39: 
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COMPUTER SYSTEMS. GROUP | |  B1800/B81760 SDL S-LANGUAGE | 
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— CONSTRUCT DESCRIPTOR FORMAL 


— Syntax: 


&k&aECRKAKRE 


*« CDFM * 


wRakkekaatk 


COFM <Lexic Level><# of ES entries> — 


Format: 


TISTTTTTTITEITCL TTT TT tT 


* 1111 01 0001 * re 
Ra Raa ee ee kk ekekhh eh kek kkk 
OP-Code rr ee * 

& i | 
fr wake hb Bit | _ | 
f of EVALUATION STACK entries 
& | 
& 


ee & Bits 
| Lexic level 


Function: Refer to CONTROL STACK Mechanism 


CS.ENTEREO.LLCCSP“1L) 2= CURRENT.LL 2= LL 
DISPLAYCCURRENT.LL) == CURRENT.NSPZ 


1. A previously executed MKS has initialty set up ; 
CONTROL. STACKCC SP <1) : | | - 


Ba eines the actual parameters have not yet been put on 


‘the NAME STACK CURRENT.NSP has not yet been bumped. 


Descriptors for tive actual | parameters are expected to be 
on the EVALUATION di | , 


The number —C#) of EVALUATION STACK entries specified ie Pe 


transferred to the NAME STACK. CAn entry is atways 48 


 obitss therefore» an array passed as a ‘parameter ha be 


considered as two 48-bit entries). a 
If the name value bit 1s one it is turned Of fe 


CDF M enptoys” no fore of paraneter checking. 


lrg cae eo 


— guraaucHs CORPORATION iy ees eee COMPAKY CONE IDENTEALS Se Oo" 
COMPUTER SYSTEMS. GRour — wtenazarz00™ SOL S*LANGUAGE 
SANTA BARBARA ‘PLANT. vow ge Ee. ee ae: meek 236d pe, | 


| CONSTRUCT DESCRIPTOR Local L DATA 


— Syntaxs. 


eeketeee 


* COLD «® 


er are 


COLD <# Descriptors><Descriptor><Descriptor>... 


Format: | 


Ice cee ete icici ec ete cece eT ete Te Le TT ee Tee ers , 
@ 2R10 090 © ete eos: 
RRR REERERREM RARE RRR ERE RE 


; OP. ‘Code rr re BS es es. 


i Rhkhhakkk 
& . & 
*~ fe ms 
a ae Descriptor sp aarvanle: size. 
ad (See in-line AG ere Pron: format) 
x 
& 


hhh 5 Bits | | 
Specifies nuaber of descriptors: 


Function: 


ae 


ze a If the descriptor is to te self-relativer its value 


The number of descriptors indicates the nusbee ot. eine 
descriptors. These wilt be used as models to build 
NPDES EO RTO, on the. ‘NANED ares - : 


the + sescrigars any siapte or arrays 


never be presente 


Array dase suber: cannot have the Length between entries 
option present. a Ae | . 


When paged array is. not indicated = 


faddress. field) wild. be. zerde. 


20 non~set f= piitdiae tie? current. aiue of the vie 
 STAcK POINTER is used as the address field of ee ae 


_— generated descriptor. The VALUE STACK POINTER is 


| : 5741 
"BURROUGHS CORPORATION. a a a ! a COMPARY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP © 81600781700 SOL S-LANGUAGE 
SANTA BARBARA PLANT ps iP eSe #2201 2389 CL) 


en increased by the total pene” of the Sake item. 


fe. When a paged array. 1s indicated. 
1. The page subscript size option wit be present. 


2 The address field o f ‘the generated descr iptor is set. 
to 9. _ 


Syntax: 


“he Foreat®: 


ore ey a es ta ee ea ee 
 guRROUGHS | CORPORATION. ae ain, ae eae COMPANY. Y CONFIOENTEAL 
. COMPUTER SYSTEMS GROUP ae ee  BheagveL 60 SOL STLANGUAGE 
SANTA BARBARA PLANT ee Pp. Se 82201 2389 ee 


cons TRUCT DESCRIPTOR LEXI, LEVEL 


kkhh kee 


* COLL eo 


Saat a 2 2 ee 


CDLL <Data Address><Descriptar> 


7 Kk kkk kk kee thee eee ek he we hk hk te ie . 


# LLLL G1 OG1L * LL-ON « ok 


_ AREER EERE RR ERE EE ER Re ae 


—cP- “Code | ee 


fe < : | 
co eee Descriptor» ‘Variabte size 
eo rane (See incline descriptor format) 
a Se os | | eee | | 
& 


=. Variable sizer depending on 
| the type bits» in this: field 


Function: | 


a fro 


This operator: uid: a eee ieee on the NAME STACK using 


the Ene line: descriptor as a model. 


*Ghedats aaure<e 4 is used to Vind. a data deceerctor. in the 


NAHE STACK: its: address field as then used for the address = 


| pret? of the. new descriptor... 


|: 


The data address will never reference a paged array _ 


sabe ae 


3-43 


EURROUGHS CORPORATION  —— a. COMPANY CONFIDENTIAL | 


COMPUTER SYSTEMS GROUP =e B1800/81700 SDL S“LANGUACGE 


ae BARBARA PLANT 7 | = 7 - ‘Pe Se #2201 2389 (L) 
CONSTRUCT DESCRIPTOR PREVIOUS a MULTIPLY 


gioeded 
—& COMP « 


kKkkkkkknk 
Syntax: CUMP <#0escriptors><Oescriptor><Descriptor >see 
Format: 


REREREERER RARER EREREE AREER EKER Re 


 ®&© 1111 16 0101 « ft * * ee 
| kkkikkkh ke && kh kek fe ik kaihhkkkk&k kk kKhhk i hkhthikt 
OP-Code a lt *& 
ie RkKRK KKK 

t& * 
& te , , * w | 
3 «er Descriptors variable size 
* (Refer to in-line aeece eens) 
* 
kt a Bits-Specifies runber of descriptors 


Function: 


ae The number of descriptors indicates the number of in-line 
descriptorse These will be used to build descriptors on. 
the NAME STACK. | 3 a 4 | | 


b. The descriptors may be simple or array. 
Co The address field is calculated asian tha following fors- 
ula: +e sf « i -*. : _ 
At = Att ¢ F © (CHES) * LB) 
ts Ate is the neu address part. 
2. Am is the address pankcok the revi ous: entry 
3. L- is the Length paredod uae previous entry. 


he F 7 is the “filler™ field in the descriptors if it is 
> ere | a eo 


Se #E - is the “number of entries" part of the previous 


entry. 


 gurRouGHs ¢ CORPORATION oe ae COMPANY. WOGNE Aan eo 


COMPUTER. SYSTEMS GROUP | Se 81809781700. SOL. S*LANGUAGCE 


cece SANTA BARBARA PLANT | i ake Ss Pa Se #220 2569 ies te 


LE is ‘the “Length between part af the. “previous 
entry. ie | - ee ee rn a | 


d- the previous entry. vs always assumed to be of type array. 
| it aot never be pagedes - | 


Oe ad 


Syntax: 


Format: 


aes 


' pipanaie CORPORATION, = =—<“i‘_OSCS—SC~™ COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP ~ a 
SANTA BARBARA PLANT = gy #2201 2389 CL) 


81800781700 SOL S“LANGUAGE 


: CONSTRUCT DESCRIPTOR FROM PREVIOUS 


kRhhkhkkk hk 


* CDOPR * 


kakthkkikhie 


COPR <#D0escriptors><Deser iptor><Descr iptor> ones 


bee RR ER RERE REAR RRAE RA ERE OR REE 


& 1110 10 * ad : x eeeoe 
Ake ktkkhkkhh kkk kkeh kkk ehhh hehe 
OP=-Code 2 a | 
| fc keh kh kt 
fe & 
* Descriptorss variable size 
* ors 
& 
see 5 bits. 


Specifies: number of descriptors 


Function: 


| 


The number of descriptors indicates the nuaber of in-line 


_ descriptors. These will be used to tuild descriptors on 


the NAME STACK. 


The descriptors may be simple or arrays 


The address portion is generated from ‘the "fillers field 
in the descriptor and information fros ene previous Seny . 


on the NAME EAE. 


The following formula is used: At = Atf 


aes Ae = is the new address part 


22 As is the address part. of the top entry on the NAME: 


STACK 


S$. Fo - is the “filtert> field in the descriptor oe is) 


present. | 


— gurroucns | CORPORATION ode gaa “COMPANY. “CONFIDENTIAL 
COMPUTER SYSTEMS” cRour ee ee 8100/81 700 SOL S*LANGUAGE 


— SANTAL ‘GANBARA” PLANT (PaSe H2201 2589 ELI 


beh ed HThes previous descriptor buitt” may be either 
_ Cie ae ae = . ; ba: | 


fe The new. and. previous data descriptors cannot be paged 
 arrayse Se os Cao oe as i 


simple or” 


3-47 


- BURRUUGHS CORPORATION =. COPPARY Salerne Ge 


COMPUTER SYSTEMS GROUP — | — B1800/81706 SOL S“LANGUAGE 


SANTA BARBARA PLANT  ——- PS ‘#2201 2589 ha 


CONSTRUCT DESCRIPTOR REMAPS 


syntax: 


Format: 


ckkhthkeki ht 


*« CORM « 


tk&ekkk ke 


CORM <Length-Check Variant><In-Line ODescriptor> 


ARK ERERERERERERR ERE RE RK KR 
&# 2111 G0 Wil «© = #& t 


RAR EERE EERE ERE Ree ee 


CP-Code = *® — * 
a «x* Descriptors (See in-tine 
Pan descrigtor | forwat) 
& : 
* | 2, 
ace 1 Bit 0 ae iaacehreneekina:. 
_— 


Length checking. 


Function: 


de 


This. ap eratce builds. a a descriptor on the NAME STACK by 


using: 


lL. The in-line sient’ information 


Oe An address _ obtained from the address field of oe 


descriptor an ‘top oe the EVALUATION STACK. 


when the hence. eneck variant is set (lL) then the tength — 


in the inwline descriptor ts compared to the length fietd. 


of the descriptor on the EVALUATION ‘STACK. If it. is 
greater a run time error wit be signalled. | 


The sectbalaed nee sii tamanee Oinids Sa oaumiads 


— gurRouGHs ¢ CORPORATION 
COMPUTER SYSTEMS sRouP 


pants BARBARA PLANT 


WAKE. 


7 “VALUE 
DESCRIPTOR 


NEXT 


ge ren ALORS 


DESCRIPTOR: 


DESCRIPTOR 


CK PREVIOUS TEN 


Load 


LOAD 


| LOADS 


LOAD 


pa 


ARRAY Fretod ADDRESS 


FIELO Ap oRESS: 


ihe delaes 


PREVIOUS | 


ADDRESS: 


ARRAY LOAD VALUE 


dias oe 


INDEXED LOAD VALUE 


INDE XE LOAD ADDRESS _ 


INDEXED Loa FIELD ADDRESS 


‘ia 


| anen: 


LOAD 


LOAD 


Lien = 


NUMERIC LITERAL 
NUMERIC. ZERO 


NUMERIC ONE oat 


REFER 


REFER: ADDRESS 


REFER LENGTH 


REFER TYPE. 


ANE MONIC. 


— wOSC 
~DEScC 


NPIT | 


Be Te) ee 


CORPARY. 1, ROME ADENT IAL 


a ae 


ae cope 


- me oe = 


ites 


1111. 
1109 


| over 
ss tO, 
eit 


areas 


APT 


Lik 
L101 


aaeee 


RLAL 


10° 


ol 
19 


Ol 


bo 
we 
at 

Jeedu: © 
aL. 
OL 
G1 
cut 


Lb 


me 
un 
7 


Se 


1010 | 


“1090 


‘1Lol 


00 


ALLL OOL 


A111 O11 


LLLL O10 


1100 


LLL 


evar. 
LL10. 
LOGG ¢ 


1600 


0000 


006 


100 


100. 


TYPES 
LENGTH. 


p4a90701790° SOL. S*LANGUAGE 
= H2202- 2569 cy 


“ARGUMENTS 


“TYPE-LL-0c 
We TYPE*LL-oc 
| IVPE-LL-OC 

TRE» LENGTH 


TYPE -OF FSE Te LENGTE 
| TYPEeLLsoc F 7 


‘OFFSET> 


TYPE-LL-0¢ 

_ TYPES “LL-o¢ 
TYPE=LL- “0c 
 TYPE= fate. 
reeste-ac 


TYPE, OFFSET® 
LENGTH : 


TYPE» LENGTHs | 


LITERAL | 


LITERAL 


Brad 


“ GURROUGHS CORPORATION =—————s—<—~sSsS—SCS ANY CONF ONT EAL 


“COMPUTER SYSTEMS GROUP = = — .—— B1e9078L700 SOL S“LANGUAGE ~ 
SANTA BARBARA PLANT | Se #22061 2589 CLI 


ARRAY LOAD VALUE 


_wtkekkik 
ae AL « 


tkkkkik 
Synt ax: AL <Data Address> 
Format: 


‘beaks eeeakeenenneaeenns 
* 1111 01 1100 « LL,ON * 
kkk keke ke kk kek kkk kkk 
—~CP-Code ie 
2% * 
& & te Varidols: size depending upon type 

(bits in this rvete 3 


 Funetion: | 


ae The Lexic Levels Occurrence. ‘nuebes pair (Data. Address) 
used to address an entry in the. NAME STACK. 


1. NAME STACKCDISPLAYCLLD#ON) 


b» The Lowrtorder 24 bit field of the subscript on top of the 

| EVALUATION STACK is compared to the “number of entries” | 
field of the descriptor. If greater than or equal an 
invalia SUD SCeaRe error occurs. - 3 2° e 


Ce If the. paged array bit of the descriptor is off (not 
: paged) then: ) =. | x * : i 


fe The array devcetotoc is -subscripted ang a simple — 
descriptor is cenerated on the top of the EVALUATION 
STACK» describing a copy of the value of the selected 
element of the arrays This descriptor will te self~ 
relative if the length of the value is less than 24. 
bitse otherwise it will be nonmsetfr-relative» its 
 name-value bit on» and the value on top of the VALUE 
STACK. — , | % 3 az | | | 


Dac eee de Paged arrays onty. 


le. if ‘ene address field a. ‘ne: descriptor is or (page 
| table not yet allocate d) then: | | | oe |: | 


“QURROUGHS COKFORATION | Pitas ee ines Ad COMPANY ‘idekeniere 
COMPUTER SYSTEMS | GROUP a. ae 81800/81709 SOL S*LANGUAGE | 
SANTA, BARBARA PLANT a ae eee eee FeSe #2201 2587 (Ly 


a) The address of the current Rar Om yh or 
LAD iS pushed, ants the EROGHAN POINTER STACK. 


b) A copy of the subscript as pushed onto the EVAL = 


UATION STACK. 


6) The base-relative bit adore Cin. the NAME. “sracky 


of the paged array de ser iptor. is pushed onto the 
) EVALUATION STACK. | | | 3 


dd The MSpace eee ae: saved Cin basipvaneiede 


form) in RS oMe MACHINE. 


(e@) the. seqment> anase segment number is given in 


ORS.INTAINSICS.LOC» is entered at displacement Oe 
(This is the memory management intrinsic). on 


f) Upon exite execution Will begin at Step ae 


The address field. points to the. first. entry in the. 


page table. The subscript is. shifted to the right by 


the number of. bits indicated by the page subscript 


size. —  . The resulting number (the page | table 
(Sub ser 4 pe): is used to access the ‘Gage taple eae ye 


lf the presence bit. air the ‘page table entry 1s ott 


dun The address at the igh ent instruction is pushed | 


onta. the PROGRAM POLRTER. “STACKS 


ae copy. of sub seri pt is pushed conte, the 2 EVALUATION | 


% STACK. 


oo: the base-relative bit address oe the page | eso 
| entry is. pushed on to ‘the EVALUATION STACKs | 


“9h;, Cxneueien ‘goes een Step aie ae (The sees 


eae is CORSET Fe 


the address ietd. of. the cage” bouts. ences. ‘points to 
the | pages The > number of bits indicated. by page 

- subscript size is extracted, from the Lon order bits 

of. the; EsUD Ser 1a Ke. aa a: | a eS ue 


This _nuaber_ (page subscript) — is used to “subscript 


the top ‘of the EVALUATION STACK as “in Step Ce | : 


a5, CO” 


BURROUGHS CORPORATION = i s—(itsé—‘“‘—s~*~s™s™SCC PRY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP 31809/81720_ SOL S“LANGUAGE | 
SANTA BARBARA PLANT 4 >  PeSe #2201 2369 TS 


ARRAY LOAD ADGRESS 


kk&e kk kt 
*® ALA « 


kkk kk eh 
syntax: ALA <Data Address> 
Format: 


TTT TTTT TTT TT TT TTT 
-#* L191 OL * LL»ON « 
ee 
OP-Code i 
| ge” 
k*x Variable sizes depentsnar ufon the 
yee bits in this field. 


Function: 


The execution of ALA is identical to that of array load - 

except that the resulting descriptor on the EVALUATIUN. STACK 
is atways non«self- relative and points to the array. element 
aie anny aah a copye (See step cel of AL). 


— gurRouGHS c CORPORATION. Se ee COMPANY “CONFIDENTEAL 
— COMPUTER SYSTEMS — GROUP — aheoasaro3 ‘SOL S-LANGUAGE 
SANTA BARBARA PLANT | " "Ble ak ye : ones Pade 2200 2589 eee * 


| beScRTPTOR 


Rae kk hike 


—  ® DESC ew 


kkhhkhkhk 


DESC <Data Adaress> ; 


Setrestrre tees Ti reTe’ | 
 * 1106 10 * LLeON «© | 


Kkkkhkhkk ekki hhh kkk 


| CP-Code | & 


& 


afield Vartabie size defending upon 
| type bits in SETS field. 


Function: © 


‘The Lexic Levet>. Decurrence. Aivabes: re G0 tte. Address) 


focates a descriptor in the NAME. sige dol descriptor 


may be either simple or. neta 


A descriptor C48 bres): | generated on the EVALUATION _ | 
— STACK that points io ‘the descriptor in the NAME STACK. | 

The Length field of the new descriptor will be 48° or 96 = | 
depending on the type of the descriptor in the NAME 


STACK. | its type will be Blt. é 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


INDEXED LOAD VALUE 


“Syntax: IL <OData Address> 


Format: 


keke &Rkekek kk ah kkk h kk && ak he 


* L111 61 0000 * LL»ON « 


Ret khkkkhkk&kik&kkkaekkkh ki ee 


3-53 


COMPANY CONFIDENTIAL | 


BLOEOO/B1760 SOL S-LANGUACE 


P.S.. 82201 2389 (CL). 


kk kkkh 
* [Lt «& 


Kk kkKKK 


O0P*Code & 


* ’ Be 
zee Varjable size depending on the 
type bits in this field. 


function: 


The Lexic Level» Occurence Number pair (Data Address) | 
locates a seserrpeer | in the NAME STACK. . a 


The descriptor Must oe non~sel f- “relatives 


When the desceintor is non™arrayp thene 


le An operand Cwhich is the index) is taken off the top 


of the EVALUATION STACK. A copy of the descriptor in 


the NAME STACK is then pushed onto the EVALUATICN 
STACK and nee iecerere fieid is incremented bai the 


2%. The ‘peculting address eee nvoluar is then made a ¥ ature 


by copying the data to the top of the | VALUE STACK» 
changing Ene: address field and setting the name> value 


ae 
Ce 
index. 
bite 
ds 


When the descriptor is an array descriptors 


1. Same as case c- “Above ZeNeepL Rey the first 48 bits. 


of the NAME STACK descrig¢tor sre picked up and the 
array bit is turned off in the type field. 


2. ‘The array descriptor cannot be type PAGED. | 


- eurRouGHS CORPORATION. Can “COMPANY. CONPIDENTEAL 
COMPUTER: ‘SYSTEMS| Grou  mteaas Bt rac! “SOL. S*LANGUAGE 


SANTA BARBARA PLANT. PT ey ee oe Oe “2201 2589 Me 


INDE xED LOAD ADDRESS 


Perret? 7 
@ eae 


ee ee 
Syntax: ILA «Data Address> 


Ate aas ee enen ene” 
OO4L © LLeON *& 


ieee ac eeec see, 


3 a Code ane 


kk “variable size depending on the. 
ee bits: in this fields — | 


# jute ROME: 72 


“adexed: bang adoress functions the game as indexed load 

values the onty- difference being that. the. resultant address. 
_ aescriptor is not ‘converted to a value (Step ce2 of Tt is 

omitted). | as oe ee et : 


3-55 


BURROUGHS CORPORATION = = 8 ————— COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP _— ene SOL S-LANGUAGE 


SANTA HARBARA. PLANT aor OO Pe Se #e2c1 2389 (L) 


LINDE XEO LOAD FIELD ADDRESS 


hkhh kk eh 
# ILFA « 


_ ~&kkkkken 
Syntax: ILFA <type><offset>{ <Length>] 
Format: 


Rk KKK KEK RK KK RRKEAHRK KKK REAR RARER EE 


# LAL 2h LLiL 900 * . « 
kkk ktktkhekk th bh eke kk eee tke kik hh kee hk . 
 OP-Code | te ne te 
| i | ME ee op 3 i 
* * | al Coptionat) 
& <.| : 
= «% & Offset 
e 


xk & ee | 
. Function: 


. Using the value on ban of. the EVALUATION STACK. as the base. 
area» the user toads a subfield to. the EVALUATION STACK | by | 
SUBBITting according to <offset> and <length> and builds type 
as specified by <typere. This SOP is only usec for indexing | 


layouts Cas REMAPS © $ASE items). end shecula eventually tbe 


phased out. 


de <TYPE> is 3 bits encoded as follows: 


6 BIT 3 BET CLD. 
1 FIXED | & BIT C24). 


(2 CHARACTER © S-7 UNDEFINED — 


“ew “eOFFSET> 1s tawehe. depending on the first bite 


Be <LENGTH> is 6 or 17 bits» dependirg on the first its 
 SLENGTH> is not present if the type is FIXED» BIT 
(1)- of BIT (24). © | Mh eh, | 


BURROUGHS conroRaTion — 
— COMPUTER SYSTEMS. GROUP 
SANTA BARBARA PLANT. 


‘LOAD, VALUE 


Syntax: | 


L <Data 4ddress> oe 


Formats | 


ee 


#1401 00 * LL-ON 


. kkk hikkkkh kkk hk kh kkk 


_ OP -Code- 


 Functton:. 


, The Lexic Levels 
a 3s ed 


: he 


with. 
Meat t hor 


* 
he. . | . 
fe te te Variable sizer 

ate bits 


to address 


NAMESTACKCDESPLAYCCLLY#OND. 


“The 
descriptor. 


dhen the descriptor. is” ele -reler we or 


a Length less than or - equal to 24>5. 
is put on the EVALUATION STACK. = 


“ aunoesbt 700 


fecueeonee Nuaber bein 
the sae STACK. | | | 


al ee 


COMPANY. Y CONFIDENTIAL i 
SOL S*LANGUAGE 
“82201 2389 eres 


7 ee ene 


aon? i222 + 


kkk kh he 


_pee@endins on. 
this Sees” 


(data address) is 


‘descriptor at this location ust not be an varray 


a self- “relative — 


non- ‘setts peace 


| 3957 
BURROUGHS CORPORATION © . \ COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP = B81 800781700 SDL S-LANGUAGE 
SANTA 3A4RBARA PLANT = Pe Se HZZOL 2389 CLD 


Ss, When ena decor totar 1s non-sel f- relative with a _Mengeh 
— greater than 242 — ee 7 


1. The descriptor is copied to the top. of the EVALUATION 
STACK with the address field modified to point to the | 
tap of the VALUE STACK. | | 
2a: The data item is moved to the top of the VALUE STACK. 


3. The VALUE STACK POINTER is bumped ty the size of the 
data ttemns. | | 


- Synt axt 


Formats 


a ct eee es ee Se 
 purrausHs ¢ COXPORATION | Pee. bates | COMPARY. CONFIDENTIAL 
COMPUTER SYSTEMS — GROUP noon te — B1890781 700 SOL S"LANGUAGCE 
— SANTAD BARBARA PLANT. ee ae 7 Ex. Se #2208: 2SOd- lhe 


— boAD ADDRESS: a oe 


kath kke 
 f& LA & 


he ee he ee 


LA <Data Address> 


SY TCT TTT TTT Tatts 
#99900 *« LLeCN «* 


Wee ake eeae ee aes e”, 


— GP=Code 


* 

| +e Foe 

ke Variable sizes “deperding cn the. 
ane bits inthis fields © 


Function: 


The Lexic Level+ Occurence Kumber pair (ata. Address) 
_ used to address an entry an the NAME STACK. © oe 


Le NARE STACKCOLSPLATCLE #08) 


lf the. descriptor: at that. docation is an array one. the 
96 bit descriptor. is copied to the EVALUATION STACKS 


—5T5e 


“BURROUGHS CORPORATION = = = = ——._— CGMPANY CONF TOENTIAL 


COMPUTER SYSTEMS GROUP. aa g180/81700 SDL S“LANGUAGE | 

"aeNTe. BARBARA PLANT on ~~ a | PaSis #72201 2369 Ck) 

_ Ce If the descriptor at that location is ye non- array type 
then: 3 | Z 
Le 2if the data item is selfcrelative then build a 


descriptor on the EVALUATION STACK using the type ana. 
length from the NAME STACK and the address of the 


leftmost bit of the data itea. Change the type of — 
the new descriptor to nonvselfrrelative. The data. 


itself remains in. the- address portion of the 


descriptor in the NAME STACK. 


If the data item is non sself- relative then the 48 bit 
descriptor is copied to ‘the EVALUATION STACK. | 


- COMPUTER SYSTEMS “GROUP 


a uri CORPORATION 


| SANTA BARBARA PLANT 


teas ARRAY FIELD ADDRESS | 


Syntax? LAF& <type> {<length>) | 
Formate 


Srevevsretiri tris t eet titi ste Teese 


Rw DAS DOPE CAPLL OPE #2 we ee 


kek Ree e ee aAkKR ARE heheh kk chiki ; 
aoP- “Code - - a: - = 


fe a 


. 


ty 


kk Tyee 


Function: 


— = hE re 
+ eae CUPPARY. CONFTOEATEAL 
J ae egOaH aro” SOL S*LANGUAGE 
ge PeSe #2208 2587 a ae 


eee 
* LARA & © 


es 2. ee 


ew kee Length (optional 


The top operand on. the: EVALUATION | STACK is an array 
— subscripts the nextc*to-top operand is a scaler. string which 


1s to be treated as an.array with. 


each element's type anda. 


- tength given by <type> and <tength>. Load a descriptor of an 
 elewent of this imptied field» using the given subscript. | 
_ Check array bounds by using the. denath: ‘freld of an lay: area 


descriptor. 


aos ae 


“BURROUGHS CORPORATION forte Oa ste COMPAKY. CONFIDENTIAL 


COMPUTER SYSTEMS GROUP 8 eOO7BL700 SOL S- “LANGUAGE 
«SANTA BARBARA PLANT oo PS 92201 2389 cab) 


LOAD FIELD ADDRESS 

. | kkk hhh 
* LFA *& 
KR KKKK 

syntax: LFA <type><offset>{ <Length>I<data address> 

Format: - | | | 


keene EERE RE REE EERE EE ER EE EERE EERE 


-® 1111 11 1111 6691 * tt *  # LLeON * 
AER ERE EERE EE RERE REE ER EKER EERE EERE EEE EERE 
OP-Code | " a | nn er eo 
® x. * a: , ee 1 . 
ot oa * ee eVarijable size 
fe le if | depending on type. 
« * *  — bits in this fietd-. 
& & & ON , 
w x | | . a 
- * tee Lencth Coptional) 
& | *& oa 2, Ee 
te te . 
tt kee Offset 
a | 
x 
_#keType 


Function: 
| Using the descriptor at <data address> to describe the base 
area the user toads a subfield to the EVALUATION STACK by 

SUBBITting according to <otfset> and <tength> and builds type 

as specified by eee = 3 | 7 | | | 

le ad is 3 bits, encoded 


BIT (1) 


9 BIT. 8 1) 
1. -FIXEO 4 BIT (24) 
2 CHARACTER = 5 


“7 UNDEFINED 
. etc. _ 


2. <Offset> is 9 or 17 bitss depending on the- first bite 
3. <Length> is 6 or 17. bits depending on the Hiree bit. 


- <Length> is not present if the tyre is FIXED, BIT 
~ C1)» or BEY C24 )— | : _ | - es 


tap F 


aS Syntax? 


— gurroucHs” CORPORATION 
COMPUTER SYSTEMS — GROUP 
coe SANTA. BARBARA PLANT. 


TELD ADORESS: FROM PREVIOUS: 


Format A 


Bale LLL. 11 Lil! vlo « as i 


a 


un ht! SOL. 


LFAP <type><offset>£<lLength>] 


COMPANY. CUNFIDENTEAL 


Pe Se H22UT: 


(teen eennee nner e Renn enna nen ennetnee 


Ene hk & WRK RRR es kde a a ee 


OP-Code 4 & i 7 


z . 


ee 


hie ‘Offset 


ees coe 


Functions: 


descriptor. on top of 
descrioe the base areap 


EVALUATION STACK by 


Using the 


—SUBSIT ting 


the user loads 


ee Length Coptional) 


the. 
2a subfield to the | 
according to <offset> and— 


‘SLengt ye: and builds ARG as specified by étyper. : 


oer e 


3 ait 
4 FIXED” 
2 CHARACTER 


BIT a) 
BIT. (2h) 


“ <Offset> is 9 or we bits. 
-<Length> 
CcLength> 


Fas ae 


ise or: i? bits» 
ts not present 
or BITC24). a o> 


, dependirg on the 


depending on the 


_<Type> is 3 bits encoded as follows: 


ae UNDEFINED | 


first bit. 


| first bit. 
if} the type ts FIXED © 


S"LANGUAGE 
2589 (LY 


“EVALUATION. STACK ee a 


3763 


BURROUGHS CORPORATION te “4 4 |  eawP ANY Wrenn 


COMPUTER SYSTEMS GROUP” B14 889781700 SOL S“LANGUAGE 
SANTA BARBARA PLANT (PeS. #2208 2389 CL) 


LOAD LATERAL 
i ei 
* LIT « 
k&akak kk KK 
Syntax: LIT <Type><Length><Literal> | 
ee 


ckkkhkhk hhh kak Rk ek hkk&kkehk tk reer ee 


* M100 « © te en 2 ie 
ARR RARRE EE EE ERE EE RE RR Ee Re eRe eee 
—OP-Code = * * ae 
| | < Ps | te | a | 2 | 
* a eee Literal, 24 tits if self-relative | 
i ee — | — . 4 _ 
fe xx Length of literal» 16 bits. 
m | 
a | | | | 
fae 8. bit descetioter type field tells. it: Literal 


is: Belt eeevative: or non? sel f- relative 


Pune yee 


. ‘This operator. Loads a constant to the top of the EVALUATION 
STACK. | : , - . & : | 


Le When a vem kc dapeliddie vada nal equal — 
tc 24 bits) the operator pushes the type» length» and ~ 
Literal onto the top of the EVALUATIUN STACK. a 


ee When the titerat is jonseelterabaviwes the types. 
| Length and VALUE STACK pointer are moved to the top © 
7 of the EVALUATION STACK and the Literal is placed on 
top of the VALUE STACK. oo 


fe for titerals ‘Less than twenty. tout tits in length the. 
: <titeral> freld must be twenty four bits long in the 
code fite even though the <length> field specifies 


that the actual data is less than twenty four bits ing 


pena ne | 


ie eae 


| coaPuTER ‘SYSTERS: oro anna 730" ‘sol S- ANGUATE |. 


SANTA MPAMBARAPEANT 200 os Pa Se “#201 2589. AEN ee 


 Loap NUNEREC LETERAL s 


ekki kee 


we LITN & 


kkk hkihk 


Syntax? LITN <Literal> 
Format: 


Coa eed 


ar ee 


~OP-Cede a i 


& 


eee 19 Bit Literal 


Function: — 


This. apenat ot toads’ a ron bees literal. to the. top of the EVAL= 


UATION: STACK as” ca FIXED? self-relative data tet.) 


Ginncueae CORPORATLON 


COMPUTER SYSTEMS GROUP 


_ SANTA BARBARA: ee 


HARE DESCRIPTOR _ 


Synt ax: MOSC 


Format: 

Aekkhkke ke kh tet t 
# LLL 10 1010 «*« 
theakhkkk kehk thhek 


CP-Caode. 


~ Function: 


3-65 


COMPANY CONFIDENTIAL 


— B1800/81700 SDL S-LANGUAGE 


PeS. #2201 2589 (CL) 


akknkkhkhk 


* MDSC «* 


wkakhtkk kik 


ae 4 descriptor is expected to be on the EVALUATION STACK. 


be This descriptor must describe another descriptor. 


ce This second. 
EVALUATION ST 
descriptor. 


descriptor (48 or 96 bits) is copied to the 


ACK after 


-— guRRGUGHS CORPORATION Pie Becite e es “COMPANY. COWFTOENTEAL 
“COMPUTER SYSTEMS” GROUP 1800781700 SUL S~LANGUACE 


SANT BARBARA PLANT ees a ee P. Se #2200 2se9 Cra 


NEXT ca PREVIOUS [TeX 


errr rr sa = 


& NPIT « 


kkk kk 
. Syntax: NPIT «Next or Previous Bit><Vata Address>  —— 
Format: 


i RRR REE Re weTrrer ey? tkkthe & & a 
* Till GL LLOL « te bh» ,ON- - 
RAK REE EK KKK RR KK ee 
| eP-Code- rr ee 
ik oe | ee te ee | | 

& #ee Variable size» dependirg on. 

—& 5 -. type bits in this field. | 

: | 


eee L Bit _ 
0 => Previous. 
Lo => Next 


Function: 


de. the heme Level» Occurrence Number pair (Data Address) 
| describes a non-s self-retatives non-array descriptor at- 


2 NAKES TACK COTSPLAYCLLD 60ND 
kk kk kk kt [= 4 kkktk & %& ek _ 


Yo Ee 


WRK E REE EK EK KE 
be The descriptor is then modified 


Pa cae eae sear la > @ se. ¢ 
Tf. &® LAs” AM we 


ER nk Rik Rete 
prea Pere renes 


Le 
At 


wo 


pte 


| | - - | | er | Seer 
BURROUGHS ¢ CORPURATION ae eee ae company. CONFIDENTIAL 


COMPUTER SYSTEMS GRouP- 4% 4 8 B1800/81709 SOL S“LANGUAGE 
SANTA BARBARA PLANT. rel tl UR Pade #2201 2389 CL)» 
ar Next _# 
ad Peet 
| 7 an 
= Atl 


qe 


ce The medified descriptor @eutacey the old descriptor and | a 
COPY: Ter atse placed on the EVALUATION STACK. 


tok NUMERIC ‘ONE 


ts 


ae er ree COKPORAT ION eG te gt oe eh COMPANY. CONFIDENTEAL 


COMPUTER SYSTEMS | GBM A stenesai700 Sol ehauauee 
ene BARBARA | PUR eg So Oe PS. #220 12589. hii 


kkekike 


* GONE «© 


i teh ek & 
-Syntaxt ONE 
Format: 


A ee 
* O11) « 


ite at. 7. 2 


 GP=Code 


Function: | 


This | operator causes a) FIXED, - setf- “relat ive: err Ce o 


 eantainiag a one tt: ‘to be placed on nee EVALUATION STACK. 


3769 


auamouels CORPORATION = —i—<i~“‘C;*S””*”SC PANY CONF TORN TEAL 


COMPUTER SYSTEMS GROUP = = ~—«sBL8OO/B1L700 SDL S“LANGUAGE | 
SANTA BARBARA PLANT 2.4 8 P.S. #2201 2369 CL) 
REFER | 


cnvkee ak 
* REFR «& 


ke kkkkee 
Syntax: REFR <tengthn> 
Format? 7 


week keke ek &k kkthkhbkeket k&k kh 


oo LULL LL Lill £00." LLdN « 


 RaeRreEnRa KE KK KK kRk&kkKkKKE &kEE Kk KK 
GP-Code | a 
| | ee. 
moe ae (6 or: va bits. depending on the | 

firse oe 


Function: 


Changes. the descriptor on Ae ‘top of the EVALUATION STACK to 
have. the address of the second operand on the EVALUATION 


STACK. The Length of the second operand is cospared to the a 


Length in- Line. If not eps ateall exception: is given: 


— aurraucus: edapor ata: 


ome - COMPUTER. SYSTEMS. cRoP a es ~ 7 Bueogselroc SOL ‘So "LANGUA GE on | a 
ANT RS BARBARA PLANT. ee Nee ae ag ReneS #2201 2589 elo 


(REFE ADDRESS. 


LON 2 = ie ae ee COMPAAY. Se RENTTAL 


: eee teewes 6 3x 
me REP A e 


ee 2 re 


og yntaxt REFA <Data address> 


Format: > 


Seeeetserie siete test tt ett) ee 


*# L112 11 1119 111 * LL-ON «* 


_ Aha Ue eee eee ERE EERE EER 
OP =CODE is ® | 

. Sg A a, 2 ao Py 
eo *Variable size» “depending upon the type 

bits: in this field. | 


Function: 


Changes. ene - descriptor: at eOaka hddeeees to. dnawe: the sanes. 
of the value of the Feo operand on cee EVALUATION STACK. 


| an : 4 | a | ce nae 
BURROUGHS CORPORATION = = = =——CCM OPA CONF FDENTAAL 


COMPUTER SYSTEMS GROUP = =—s B LEGO/BL790 SDL S-LANGUAGE 


SANTA BARBARA PLANT ; — PaSe #2201 2389 CLO 
REFER LENGTH | 


ww akke kk t 


# REFL * 


kee kk kk & 
Syntax: REFL <Nata Address> 
Format: 


errs eur eereee 
® LLLL LL 1000 GLI * LL-ON « 
Oe eLar ess 2 RKKKKKKKNRK KKK KK 
~—OP-CODE : & 
| | | ‘ 


* te “* Variable sizep depending upon the See 
bits in this field. | 


Fuct icon: 


Changes. the desces ewe at <Data Address> to have the Length 
| of the vatue of the top operand on the. Persil oa 


— guaRaucHs ¢ CORPORATION Bie es | COMPAKY. S eueein 
Oe COMPUTER: SYSTEMS. GROUP Bee ey Sad 81800781700 ‘SOL. SS*LANGUAGE 0 
ee BARBARA PLANT a Oe P. Se #2201 2589 BEV 


errerrt a 


* REFT ® 


ehh kkk 


oS Formate © 0 | oan Ti ee oe 
7 a ee ee ee 
* LLL th 1000 109 * LLeON *& 

IOI RI ER tte 

GP CODE 
_ | we | . | Sesh Bh 

i * Variable Size» Meoana ie: upon. the type 

| | bits in ent: PVeUGst © 2. 2 ie 8 eg 


Function: =, | . 


tnandas, ene: ‘descriptor. at “Data nadeeses to have the type of 
the value of ene aoe EAN: on. the: EVALUATION: PTAC NS Pee 7 


ES eS 


-— aurRoUGHS CORPORATION gpa “CONFIDENTIAL 


COMPUTER SYSTEMS GROUP $23 oo 3 BEEQGZEL IC? SOL S“LANGUAGE | 


VALUE. DESCRIPTOR 
kk hh & te 


# VDSC «*. 


t$ktthkkkk 
| Syntax; VISC 
Format : 


eee RKERKEKK KK KEKE 
* L111 91 1000 * 
keke kakk kk kk hk hee 


CP-Code 
Function: 


ee 4 descriptor. is avnecred to be on the: Evaluation “STACK. 
The following conditions are (expecteds but NOT. Cneckee: 
1. The name-vatue. bit must be OFF. 


2 The non- sel f= relative bit must be ON. 


3. The descriptor is always 48 bits. 


b. The descriptor is moved to the VALUE STACK. 


ce The descriptor on the EVALUATION STACK is paptaced by a. 


SANTA BARBARA PLANT a oe PeS. #2201 2389 Ly 


48 bite nonmself=retlative | descriptor that peynss to” the. 


descriptor just moved to the VALUE ene 7 


-——exeo07ei760- ‘SOL ASTuANGUKGE 


ee NUMERIC ‘ZERO ee 


eh woresker hoe. 


SE aewaede eS 
eee, OTL a ee 
oat? s 277 7 ee 


eg MR “Pode iy she 


EF Paasten ee mo 


ee me 
le ee ZOE ae 


eee 


This’, operator causes” a FIXEDs gal f>retag ive descriptor to are 


generated ‘and. placed on the EVALUATION STACK. The. descriptor. 
wid contain: ‘the: nuaber zero. as oo hr ee wee Be ors 


BURROUGHS CORPORATION 


COMPUTER SYSTEMS GROUP 


«SANTA BAKBARA PLANT. | 


BUMP VALUE STACK POINTER 


DUPLICATE 


DELETE 


EXCHANGE 


FORCE VALUE STACK . 


WNEMONTC 


BYSP 
DUP 


DEL 


3-75 


aca COMPANY CONFIDENTIAL 
7 B1800/81700 SOL S-LANGUAGE 
i iP eSe #2201 2589 (Ld 


io LOL 


00° 


Co 0011 


0 


01. 


ARGUMENTS | 


| “COMPANY é CaNe PERSE 
81809781700 ‘SOL S"LANGUAGE ~ 


SANTA wana ESe #2201 2589 hy 


BUN VALUE STACK ‘POINTER 
, ce, skemwehe 


fe RYVSP. * 


teeenene 
Syntaxs) BVSP 
Formats 


ety aie a Preeereriee cere ee a 
aoe 2112-10 LOUD ® 
Re Le eS ee 


 aP=Code 


Functions 


Ee a The. descriptor on the ome of the NAME STACK must be a 
simples. non selfcretative . descriptors — that PotnEs to ee 


topo of the VALUE renee? 


be The tow order “16 bits of the value described by ae ee 


Pee "Rhie length “field- of the descriptor, on top of the: 
[MAKE STACK. Se 


pies a ae bon ae noes, pointer: for: the VALUE STACK is incr es aa 4 


Ra by this 16 bit 2 


UNOTES | Jhls “operatar= as not generated oye the sob compiler after 


the: TV.0 release. 


3-77 


BURROUGHS CORPORATION = = COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP > Bh e6N7BL790 SUL S-LANGUAGE 


SANTA BARBARA PLANT =  . P.S. #2261 2389 (LY 


DELETE 


kkk kkk 
«* DEL »* 


Rath 
format: 


kkk kkkkkkhkhk kik th 
# L111 00 O91 * 
RK AHKRRKEKRKEK KREREK 


CP-Code 
Function: 


The top 48-bit descriptor on the EVALUATION STACK is deleted 
along with tts assoctated vatue in the VALUE STACK if the 
. name~value bit is one | a8 | 7 a. ee 


NOTE: This operator does not delete both carts. of an array 
— descrirtor. oo i ? | | 7 


-— gurRauGHS: ‘CORPORATION, = tt  CowPANY. “CONFIVENTEAL 
COMPUTER SYSTEMS. oe a SOL S-LANGUAGE 
SANTA BARBARA | PLANT. 7 AP Ti, Be ee ot > (eS Se #2Z01 Gee Ae oe 


“DUPLICATE 


oe DUP # 


kkk kkkk 
— Syntax: OUP 
Format? 


ries tet 


#1100 00 « 


kkk kkikhkh te 


OP- Code 
gate 


* as has oper ator takes the 48 rit (simple) descriptor on 1 the. 


top of the EVALUATION STACK» auplicates it exactly and — 


pushes i it onto Eye, oo oF the. EMSEUSTEON ors 


‘be. Tf the namre~ quis bit. Be was ati dad Adin ce 
: not be duplicated. — ae ae me. | 


—@URROUGHS CORPORATION — 
COMPUTER SYSTEMS GROUP. 


: _ 3-79 
COMPANY CONFIDENTIAL 
B1800/91709 SOL S“LANGUAGE 


SANTA BARBARA PLANT) = =— sé Be HZZOL 2SBI CLD 


FORCE VALUE STACK 


Format: 


7 3 | : kkk kkk&h 
8 * - ¢ 3 , a a | x FVS «* 


he te he te ke he ke 


Syntax? FYS 


RAMEE KKK 


# £109 91 * 


kkhkktikhh kk t 


- OP-Code 


Function: 


eo 


Ee 


An operand is expected to be on the EVALUATION STACK. 


If the operand is a nonvself-relative values no action is 
taken. Otherwise the operand is converted to a nontself- — 
relative value by copying its data to the top of the . | 
WALUE STACK, setting its descriptor's address fietd to 
the copied data and changing the type field to. non-sel f= 


relative vatue. 


ae ae hs 


- guRROUGHS. coRPoRATION hee 7ts Se te COMPARY. Seana 
COMPUTER SYSTEMS. GROUP. BL ENON TOO. SOL S*LANGUAGE =: 


SANTA BARBARA PLANT oe eats oe Pade #2201 2369: PEL ae 


(EXCHANGE 


teen 
* XCH * 


ie fe te te te tee 


Syntax?  XCH 


Format: | 


beh keke ket 
-*€ LO11 00 «| 
chk RRA ERE 


OP "Code 


a Function: 


ae This operator swaps the twe top descriptors on the EVAL- 


| UATION STACK. 
ee ee ee re 


ee. The name- alu bit may be set in oner but not both of 
the eee tare | | ash he Se 7 Eee ee eee 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 


ont. BARBARA PLANT 


IF THEN 
IF THEN ELSE 


CASE 


UNDO 


UNDO CONDITIONALLY ~ 


RETURN 


‘RETURN FORMAL CHECK | 


EXIT 
CYCLE. 


MARK STACK 


| MARK STACK AND UPDATE 
_ ENABLE- DISABLE INTERRUPTS, 


EXIT-ENABLE INTERRUPTS. 


— CO“ROUTINE ENTRY 
— COROUTINE EXIT 


(OMS_ CALL 


- MNEMONIC 


CALL 
IF TH 
IFEL 


CASE 


UNDO | 
UNDC 
RTRN 


 RTNG 


exit 
CYCL. 
WKS 
MU 
or 
XTEL 
CNTR 
CxIT 


“OMCL 


3-81. 


COMPAKY | CONFIDENTIAL 


PoSe 


OP. CODE 


1101 


1111 


10. 


01 


1609 


ae ps 2 
LILL : 


ALLL 


bon 
111c. 
1911 
Abit 
ALLL 


2a 


i111 


“ALbl 


aha 


dt 


Li 


0100 


| Bl@0C/81706 SOL S“LANGUACE 


#2201 2389 CL) 


a 


OLoL 


LioL 


Lili. 
Olol 

9110. 
“1010 
1010 


LLio G11 


Col 


(069 


Col 


“ARGUMENTS 


_TYPE-SEG- 
PAGE-DISP_ 


TYPE=SEG- 
PAGE-DISP 


ADDR TYPEsTYPE- 


SEG" PAGE“DISP 


# OF ADDR» ADDR 


TYPE» TYPE-SEG- 


PAGE“DISPr.cer 
TYPE-SEG-P AGE 
DISP 


¢ OF LEVELS | 


#0F LEVELS 


eof LEVELS 


# OF LEVELS» 


TYPE»LENGTH 
# OF LEVELS 


DISPLACEMENT 


Aas. 


ve 


Ve# OF LEVELS 


# OF LEVELS 


: aeeeunis? CORPORATION | 


COMPUTER ‘SYSTEMS — GROUP 


Se NT BARBARA PLANT 


et cae 


Syht ant cal code Address? 


ers eA 


) heeeeneean es ae es 


a eo ee ee 


| kik eek eke heheh 


Ope “Ccde .* 
oe me 


- #ee Types Segment> 


Function: © 


ae 


The code address. 
address of the next 
require a Lagt up 

hes hs eee = 7 


The code address type may not be of 


The Location (page numberr 
of the first bit following the 
the PROGRAM POINTER STACK. — 


Instructtor tc 
in the segment dictionary to 


in 


amd 


ao “covPany” CME DENTAL AL 
BLBOOLAL TOI SOL S"LANGUAGE | 


eee ke kik 


* CALL «| 


wee tek hehe ee 


Displacement 


type "null". 


segment sumbers 


EASIER Ete tra, aun, Into. 


used as the — 
This may 


is. 
~—6erKKecutee. 


instruction | 


82261 2589 chee 


di pbacewencie 


locate the — 


3-83 


re CORPORATION PANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP oe | a B18090/81700 $oL s- LANGUAGE 
3 SANTA BARBARA Se ee #4 | PeSe #2201 2389 (L) 
CASE 


ccna eR 
€ CASE «& 


ke KK KKK K 


| Synt ax: CASE <4 of Code Addresses><Address Type> 
ne <Code Address><Coce Address> esses 


Format: 


At RAKE RK EE kkk kh kkk ke kike te AR RRARRERRRE RAR REE 


# Lill ol 01906 * te Be Po te he ie 
Rake eke KK KKEK kRhik hk th kkkthkktkk kik hkh ith kKhk$ehkkhhhkhkkhhkhkikhh 
cP-Code te he . @ - 
Sesser eupennin 
ie ac 
& 


fk CALL addresses are 


by <Address Type> 
 untess they are 
nuli). 


ee ee eR eR 


ee 3 Bits Code. 
- address tyre 


> eh ee He Re 


wake 8 Bits 7 
#f of addresses. 


Function: 


‘ae An operand is-expected to be on the EVALUATION STACK. 


o f types specified 


The value of this operand is used to select one of the. 


code addresses. 0 selects the first. address» it the. 
seconds etce a 8 a : ee 
be. When ae is out cf ranger an error interrupt © 
 OCCUrSe. | ee fan ee Ee ee eS 
Ce When the proper address has. been isolated a PEM TE x, 
per formed on that address. | _— ao 2 | 


de Any of the | addresses. may ne © null addresses Ctype. 
field=111 €9)) in which case the: rest of ale address bel mae 


be padded with (ZeTO Ss 


es When a null sapl'éx andeae sak iabstiak 6 termi= 


mated. — 


eae: 


BURROUGHS. conpawarioy “COMPARY. CONFEDENT IAL: 
— COMPUTER SYSTEMS| GROUP “8 “BLE0L/B1709° ‘SOL S*LANGUAGE 
SANT AL BARBARA PLANT | ee - ee ke Pe S$. #2201. 2589) Chg ce 


© CORDUTINE ENTRY. 


Syntax: CNTR 


Formats 


RRR RKRR ARERR RK 


#1111 11 16109 9600 * 


HARKER RKE KEE et nk kk & te kk 


op- Code 7 


Pa 


tikk kk it 


* CNTR « | 


fe ie tet fe he tee 


The re SaSec4 at ed: with: eae of. the -covroutine operators has 


the following format. 


“DECLARE, a 
| 01 ie fF : _ es 
02. “NUMBER. OF. ENTRIES a ee 

02 ENTRY. ADDRESS BTEC sO) 


G2 PPS.COPYC16) ss BITC32)6 


eh 


ae The descriptor on the top of the EVALUATION STACK with 


contain the address of TABLE. 


a ae current ‘code address We. pushed onto the. 


POINTER STACK. 


setae: 


ee, the 2. Ge Oee of. deteeenes oe PPS. COPY+ specified by 


NUMBER.OF ENTRIES is pushed onto the PROGRAM 


POINTER — 


de ine agarose ie pe te ‘ei, taken from. 


pene ADDRESS~ 


(3585 


BURROUGHS CORPORATION on re a COMPANY CONFIDENTIAL ~ 


COMPUTER SYSTEMS GROUP oe BL 809781769 SDL SLANGUAGE 


SANTA BARBARA PLANT = =  PaSe #2ZOR 2509 CLD 


“co-RaUTINE EXIT 


ek kkkkkhe 


« CXIT * 


wkakk kkk k 
Syntax: CXIT <# of Levels to extt> 
Format: 


&ke kkk keke the dkkek kk kt ka ee & & & 


*# 1111-11 1010 001 ©  . # 
TTT TT TTI TTT TTT 
OP-Code « 


kkk Bits» neeieaes nuap er 
of levels to exit. 


See CNTR for TABLE format. 
Function: 


a» The descriptor on the top of the EVALU4STION STACK. with 
contain the address of Pioeee 7 7 | f% 2 


t. Number of Levels is asiinepianceiearien. + 
Ceo The current code address is stored in ENTRYADDRESS. 


id. The number of entries on the top cf the PRCGRAM POINTER 


STACK» Cspecified by # of tevels) is copied to PPS.COPY . 


(9) through PPS.COPY C# OP Levels~1) if the #@ of levels 
is Ue nothing is copied. | | 


ee An UNDO 1s) peetor dene UeinG the ’ of levels as the number 
OF entries to ‘Pop off the PROGRAM POINTER oe 7 


- guraddens CORPORATION 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT 


crete 


Syntax? CYCL <displacement> | 


Format? 


Akkkkh kath ek ToTsiT eT 
* LL10 LL *® ° & 
ake kk kk kei kkthk kkk 
OP= Code re a 
ce ty inane 

— et 12 Hits» 


Function: _ 


as “When” t the era oe 


instruction. 


peo the ee bit displacemert— 


COMPANY. Y CUNFIOENTEAL. 5 
aosg1 199 SOL S-LANGUAGE 
- RP eSe #2201 2589 (Ly 


i &khkkkhk kk 


«® CYCL * 


ethkkkkkke 


specifies the relative branch address | 


Bone by jhe processors the | ae 
program. pointer. with (Foint the the first bit of the next — 


1S. then subtracted tcce. the 


a BESgn as pounter to give a ney next instruction address. 


si -@e . This eer ater does woe aauce a change in code segment. 


Ee Ne gee 


NOTE : 


Sear: 


“BURROUGHS CORPORATION — _ 3 COMPANY CONFIDENTIAL — 


COMPUTER SYSTEMS GROUP. B1@0O/B1 700 SCL S“LANGUAGE 


SANTA BARBARA PLANT — | Pa Se 2201 2589 CLI 


ENABLE Penne INTERRUPTS 


—Synt axs 


Format: 


kkk hk kk ke& 
*® EDI « 


Khe kk hk 


EVI <Enable-disable bit> | 


AKKARERK KEKE RRR KR 


# WLLL 11 0101 « — * 
kkk “22 e% kKktk kik kt kk ik & 
CP-Code ) 


ae 


Enable 


aes 


. routine then performed. If no high priority interrupt _ 


fe ie l bite ¢ => Enable 
1 => Disable 


Function: 


Oisabte 


Disable extracts from the inierruct queue a high sioniey = 
anterrupt and places the porte channels. and reference | 
address aseectated: TED it. on top of the ieee 


‘a MCPfs iianenniaraty interrupt handling routine 1s 
entered (via a CALL). If there is no high priority 


interrupt in the queue the next in line Scop is executed. 


Enable checks the interrupt queue for a high priority © 


interrupts if one exists it places the associated porte 
channel» and reference address in the EVALUATION STACK. 


A CALL to) the MCP fs “hagh pracesty iatervuge fanalang +; 


exists UNDO is perforeeds: to terminate nancy of » 


high PS interrupts. sat a 


For MCP use only. 


- guigousis, c CORPORATION 
COMPUTER SYSTEMS. GROUP 


oe 


— cowpany. Y CONFIDENTIAL 
“BLBOO/EL700 SOL S-LANGUAGE 


SANTA BARBARA PLANT Wee rs ade nee PeSe #2201 2589 ee 


eam 2) 


ererrTer 


oe EXIT # 


een enee, 
“Syntax? EXIT <# of Levels>. 
Format: 


Cee ners eerie : 
fw TLOL AL & foe 
ecreerevecere TT Terre 
9P-Code te 
| , oe Ie oa oo ee 
*x* Number of levels to exit (4 bits) — 


Pe ee ee ee 7 


as orspLay ‘and. CONTROL STACK are updated ‘by the following | 


algorithas | : | 7 one aoe 
CURRENT. NSP: =CS.NSPCTCSP? =CSPt seca: 
CURRENT. v5P: <CS.VSPCCSP)S Pte ® 
aca SEARCH FOREVER? ee 
“IF CS.EXITED. LLCTCSP) =) THEN unoc C SEARCHES oe 
uF CURRENT. Lt cS. ENTERED. LLCTCSP =TcSP-1) THEN cto 
—— ‘ oe a, 
oe DIS PLAY( CURRENT. LL): edate 
UNDO. SEARCHS on 

ENCS 

~ ew SEARCH: 


| CURRENT. LL:=CS. SsEXITEDSLLECSPD? 


2 age! aw! unpa is performed on the PROGRAM POINTER “STACKe using — 


ae number of level's. given in the Pe ees 


BURROUGHS. CORPORATION. pany CONFIDENTIAL 


(3-89 
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Synt ax: 


Format: 


OTF THEN ELSE 


TT tere S| 
* TFEL « 


kKkihkhk hh 


IFEL <Address Type><Code Address><Code Address> 


Rak kkk kkhk kh ekkk kk kh hkhe kk kk kk kh hk 


 * 1101 10 * oe c & 
— RARER KKK RE KERR KRKKE RK KKK 
OP “Code & | < 
Pe te i fc 
* . «xx Type» Segment» Displacement 
& fe | 7 | 
i & 3 7 ime te a 7 | 
t #ee Types Segment» Disclacemert — 
= — oo a a —_ 
ae 


ke ke Address a. 3 Bits 


The type of both code addresses aust be ‘che: Same as the <Adaress” 


: - Type>« 


te code address may not be of type “null. 


Functions 


ae 


An operand 1s taken froa. the EVALUATION STACK. 7 The 


Pane aoss bit of the watue of the pESTans is examined. 


i= True 9 = False 


If true then> 


2. A CALL instruction. is executec using the first code 


address. 


‘If false then 


ot. A CALL instruction is executed eee ree ee 


address. > 


The return code address that is pushed Into. the. PROGRAM 


POINTER STAC by the ewes points tc the tit following this 
‘Instructions — 7 


-AMAROUEHS. CORPORATION 
— COMPUTER SYSTEMS GROUP 


SANTA, BARBARA PLANT 


ae THEN. 


(Syntax 
Format? 


kkk eke eke eke 
Se UBOL e 
ake eeekeeee eae | 
ea ty 
ee of 


-_ eee Typer 
Function: 


ae An sper ad be vakent 


"eG yeaa d False 


Tf true then | 
de A CALL: 

eee _atven in. the: 
The” return code. 


PROGRAM POINTER 
this 


Be 


if false thens 


de 


- tion tine 


Segment» 


ea from. 
rightmost bit. of the value of the: eperan’: 


instruction 


address 
| STACK 
instruction.  — 


instruction 
as executed. — 


Sagas 


COMPANY. rer eae 


= nen0soi ron Sok Ss PE KAGIIN CE, 
: (PaSe) 


Prrvittttd 


« IFTH ® 


Peer a 2 2 2 ee 


TETH <Code, Address> 


—Oisplacement 


Micky” The 
is ani neds. © | 


the. EVALUATION. 


executed using the code address 


‘instruction. 7 


a ee are 
to the bit fotlowing 


that 
points 


is icenwinaked: and the next -iastrucé 


‘BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP — 


SANTA BARBARA PLANT 


MARK STACK 


Syntax: MKS. 
Format: 


| Rak eke ek 
# 1011 11 * 
thkkkhkkh kk t 


 OP-Code | 
Function: 


Refer to CONTROL STACK 


mechanism 


3-91 


COMPANY CONFIDENTIAL — 


—B1800/81700 SOL S=“LANGUAGE 


PeS. #2201 2389 (L) 


&§$hkkk kk & 


#« MKS « 


thik hk & 


The CONTKOL STACK is updated by the following algorithn: 


CS.NSP(CSP)2=CURRENT.NSP3 


CS.EXITED.LLCCSP)2=CURRENT.LL3. 


~CSSENTERED.LLCCSP )2=95 


CS eVSPCCSP) 2 =CURRENT.VSP3 


CSP==CSP + 13 


iS meine CORPORATION 


COMPUTER: SYSTEMS GROUP 
SANTA BARBARA PLANT. | 


- WARK STACK ANG UPDATE 


| Syntaxt aKU <Lexic Level> | 


format: 


ereectettet etee tr tt ee ies 


-®# TALL OL LLLL ®& | ®t 


RR OR tO tk te tek kk ik tt tn 
“ee ‘Code nr 


tet ho bitse Lb 
 Lexic Level 


Function? — 


en 


came any. (CONFIDENTIAL 
| aneooset 700. SOL S*LANGUAGE 
ee Pode) d220 2389 (Ld 


: } : 
* 


hha 


* MKU. ® 


kikhk kek 


being entered. | 


Pig The. “CONTROL STACK and DISPLAY. are. updated ty the following at go- 


rithms 


| CSP.NSPCCSP): =CURRENT.NSP_ 
 CSCEXETED.LLCCSP)2 =CURRENT.LL 

CSeENTEREDSLLCCSP)3=CURRENT. LL: 

—CS.VSPCCSP) Z=CURRENT.VSPS — 


CSPsS=CSP#l3 


| DISPLAY (CURRENT. LL): =CURRENT.NSPS 7 


3295 
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RETURN. FORM4L CHECK 
as ee ea a 
* RINC * 
wh kh & & th & 
Syntax: RINC <# of Level s><Type Field><Length Fietd> 
i 


Format: 


kkk khkhkkkhhkkkkkkk th khkk kit khhkhk hk hk hha he 


A LILLE LE LLOL OOL © 0 © 0 ke 
tkhekn kRakKKK KKK RE RARE RE ee kkk th tekken 
uP~-Code * ee 2 * 
oe | te te ae | | | 
* * #*e Length Field (6 or 17 
a! & bits). Present only if | 
* te 2 length varying bit is 
& tk 7 — " 9S not sete. a 
& & . | ; - 
3 * | 
* tex Type (8 bits) | 
& 
& | P md a 
wet Number of levels 


Function: 
Refer to Control Stack Mechanism 


ae Type Fietd 


Bits: 99 = Not used 
| 1 - Not used 
2 - Not used 
3 - Not used 
5 OG BIT | 
Ol FIXED © 
16 CHARACTER 
1i VARYING : 
= Always 0. | ys 
T-1if Length is varying 


be DISPLAY and CONTROL STACK are updated using the following 
algorithm: 7 | | 
 deietie Gen diakaiamadiecoeibededy < 
CURRENT. VSP 2=CS.VSPCCSP 5 | eG 


BURROUGHS: CORPORATION | cae ae Company CONFIDENTIAL 
COMPUTER SYSTEMS GROUP eee ee Ge. aLeoos e170 sol S“LANGUAGE 
SANTA, BARBARA PLANT ES Pe S- #2201 2389. ay 


a oo | 


is. ea ea 


SEARCH FOREVER eee 
ae C5. EXITED.LLOTCSP)=0. THEN, 
UNDO SEARCH ate ehh 
TF CURRENT.LL=CS ENTERED -LLC1CSP2 =TCSP-1)_ 
THEN 3 ee 
DISPLAY (CURRENT. LL): SCSANSPCTCSP)S 
| UNDO SEARCHS | Pi de a ee 
ENDS 


es SEARCHS be ae 
— CURRENT.LLE=c5. EXITED. LLCCSE DE 


* 38h one A 


The yates to. be returned is. an operand ‘on the. top of the | 
EVALUATION STACK. a | | 


, The type and Length. of the data must. watch. the a cepe: ona «. 
length specified in the instruction unless” the type or 


t SaRGEE AE RSET IORT 


ooo the operand on the EVALUATION ‘STACK is. not self-rela- 
tives the data to be returned is moved to the top of the | 


ee ives changed to a value. froe an addresse 


An UNDO is. pecuseaad: ‘on the. PROGRAM POINTER STACKs using 
the number of fevels given An ENS: instructions. i ar 


eee” : 


BURROUGHS CORPORATION = ===  ——s COMPANY CONFIDENTIAL — 


3795 


- COMPUTER SYSTEMS GROUP © BLeoosB1 700 SOL S*LANGUAGE 
— SANTA BARBARA PLANT | a P.S. e201 2389 (L) 
RETURN 
kkkhk kkk k 
* RTRN & 
ee oe 
Syntax: RTRN <# of Levels> 
Format: | 


Keke kkk hk kk ke khkkhk dk kt & 


@ LLLL of 9101 & a 


kth kkk kk hk hk kk kk hh kh th 


OP -Code a 


see & Bit field that specifies 
the number of tevels 


‘Function: Refer to Control Stack Mechanisa 


RTRN performs no check on the type and length fields of 
the value returned and is the return that is normally 


emitted by the compiler. RINC does pertore checking and 
is available as a CORRE oor aens 


The value to be returned is an operand on the top of the. 
EVALUATION STACK. | - : a. _ 


If the name value bit is off and the descriptor is non- | 


oer era eee then an error condition occurs. 


DISPLAY and CONTROL STACK are updated by the following | 
algorithms | | | aP at, goa 


CURRENT.NSP S=CS.NSPCTCSP: ei 77 


CURRENT.VSP2=C5. 2 VSPCCSP D3 


‘DO SEARCH FOREVER; 


IF CS-EXTTED.LLCTCSP)=9, THEN, a, 
UNDO SEARCHS ~ aoc ern 
IF CURRENT. LL= CS. ENTERED. LLcTe SP:=TCSPrb) 7 
THEN © , te 5, Oh, ate Gf oe te 
pos a _ fe Ones aa a We eee 
DISPLAY (CURRENT. LL): =CS.NSPCTCSP)S. . 
| UNDO SEARCHE Fe ae 
; ENDF 


BURROUGHS CORPORATION Wet, et “CORPANY. CONE tOEWTEAL: 
COMPUTER SYSTEMS GROUP aa eo ee aLeonsB1 700° SoL S*LANGUAGE 
“SANTA BARBARA PLANT ‘Ge 0S. #2201 2589 CLD 


ao eee 


END SEARCHS | 


RR =CS+EXITED. sear 


- tiver the data to be returned as moved i. the top of the | 
~ VALUE. STACK> iseee changed to a value from ar address. _o 


Lf the operand on. the EVALUATION. STACK “és ‘not ‘sel frrel a> 


ie UNDO is neetonued on the PROGRAM POINTER STACK» using 
the number. of levels given: an the Anetcuet rons. ~ bap cle “ean G 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 
SANTA BARBARA PLANT © 


UNDO 


Syntax: 


Format: 


UNDO <& of Levels> 


RERKKRKEKEKKE KE 
*# 1000 «. * 


eee aegeRagkae hea kt 


OP-Code 


ff 
ie 


5-9F © 


COMPANY CONFIDENTEAL — 


81806781700. SDL S-LANGUACE 


PeS. #2201 2389 CL) 


wkihkkhh 
* UNDO «* 


kRkkk kk kk 


see & Bits to designate number 
of tevels to undo (u°15)_ 


Function: 


de 


The PROGRAM POINTER STACK 
levels specified in the instruction. 


as the potnter to the next 


is cut tack by the 


numcer of 


The next entry in the PROGRAM POINTER STACK is then used 
Instruction. This 
then also cut back from the PROGRAM PCINTER STACK. 


entry is. 


a) ee 


—gurrousns CORPORATION a ee  caveany, “CONFIDENTIAL 
ae — COMPUTER SYSTEMS GR our ae oe = aie: ac 9781 790 SUL S= LANGUA GE... ” : | 
os (SANTA BARBARA PLANT” De te  PeSe #2261 2589 oe 


UNDO CONDITIONAL 


cerrtts Ts 
#* UNDC * 


ae 


Syntax? UNDG ¢# of Levels> — 


Format: 


|) Maes @NER ER AGES wee ee 
* ALLL 91 9011 ®  # 
| tke kh kek kek tk tk keke ik 
: cP Code «& 
* a. 2 7 _ ee Net 
tee & Bits»s specifies number of 
tevels to undo (9715) 


Function: 
as An operand is taken from the top of the EVALUATION STACK. 


be «The rightmost bit of the operand is interrogated: | 


it 


“TRUE 


_<— 
io 


= FALSE 


es When true an UNDO operator is perforaed for the number of — 
ge ieee indicated. ot a See ee or aa ae : 


de When. palee ‘ie instruction is terminated. and the next 


in-line instruction. 1s executeds 


| | . “geo? 
BURROUGHS CORPORATION = .  COWPANY CONFIDENTIAL 


— COMPUTER SYSTEMS GROUP = BLBGOVEL7GG SOL S-LANGUAGE 
SANTA BARBARA PLANT — | a PS. #2261 2389 CL) 


EXIT, ENABLE INTERRUPTS 


kvn Oe ke 
* XTET « 


| &akk kkk & 
Syntax: XFEL <UNDO or EXIT bit><é# of Levels to exit> 
Format: 


. kee ete en eknn weKR et kk khkknk nek 


* Lill 11 0110 * & ff 
ARK REKKRAEKRKEKKEKKkEKKKKKKK KK 
cP-Code a 
a . fe * 
x *ke & Bits» specifies number of 
* OS of — levels to exit. 

& ; * ; 
* 


eee Bite variant to siete if UNDO or EXIT 
9 => UNDO |. Ss oe oe 
1 => EXIT 


Function: 


The execution of XTEI is identical to that of EXIT> except | 
that. ‘interrupts will be enabled before the operator termi - 
nates. — , ; . ; 


NOTE: For MCP use only. 


~ euRROUGHS. corronarten care aay Y CONFIDENTIAL 
COMPUTER SYSTEMS GROUP 81800781700. SOL S-LANGUAGE 
SANTA BARBARA PLANT. BE BE a OS BS “#2201 2389 CL 


(mse 


SN gene 


myai2 22 2 2 


® DMCL «| 


a 7 2 2 2 2 ee 


OMCL 


Format? | 


. hk Rikki kee kk & keke 


* 22111 11 1110 O11 * 


7 tkk ekki kkk kh kk kh kRkhkhe 


“Function: 


Three operands are. taken fron the EVALUATION STACK. 


= The top eneeiaa: is the page puabeees tf this vatue’ ais net 
in the range of pages within the programs ther an. SURO tS 
interrupt will CC CUT: >) er ace bs ae Meet 


The se ond operand Ss the ‘segment wiabers Tf this gecdes, 
is not in the range of segments within the speci fied page” 
then an error. Interrupt will occur. -_ | _ 


The. third aperana is the displacerent. | Tt this. value. ie: an 
not in the displacement rance of the ‘segments — then. an 


| error, interrupt will aC cuta.) 2 


The (ocation of the first bit following the _intruction is 
mages on the PROGR 4M POINTER STACK. DS gg gt wed, 28 


_ The Beas address. specified | the pages segment and © 

displacement. is used as She re of the. next instrucy — 
tion to executes. This will require a lookup in the 

— segment. dictionary to. Locate the meoeeots a 


EURROUGHS CORPORATION 
COMPUTER SYSTEMS CROUP 
SANTA BARBARA PLANT 


8 SCAN OPERATORS 


SEARCH SOL STACKS 


SEARCH LINKED LIST 
SEARCH SERIAL LIST 
SORT SEARCH 

THRE AD VECTOR 
INATIALIZE vECTOR 
SORT STEP DOWN 

SORT SWAP 

SORT UNBLOCK 


DELIMITED TOKEN 
NEXT TOKEN 
DEBL ANK 


CHARACTER FILL 


TRANSLATE 


- F IND Sei bail CHARACTERS 


BINARY SEARCH 


MNEMUNTC 


BLevO/BL700° SOL 
Pe Se 


LLL 


Lill 
Liil 


1111 


1111 


biti 


1111 
1111 
ania 
Alil 


Lilt 


2411 


Litt 


1itl 
meee! 
Bua. 


3-101 — 


COMPANY CONFIDENTIAL. 


oP Cove 


il 
Ol 


it 


. 


11 
it 
li 
11 
11 


il 


AL 


11 


Li 


il 


11 


6 & 


ti 11 1001 


1110 


1010 
1009 
1911 


1011 


Oil 
1011 | 


1011 7 


1011 


LOOL 


1901 


1061 


L001 


1110 
1001 


1900 


STLANGUAGE 


#2201 2389 CL) 


1Gl 


001 


COC 


010 


ING 


loL 


OL 


ARGUMENTS © 


VARIANTS» 
LL-OC 


COMPARE TYPE 


COMPARE TYPE 


TYPE“LL=QC> 
DELI» DEL2 


TYPE-LL-oc, 
SEPARATOR» 


TYPE-LL-OC 


o10° 


TYPE> 


- quaroucHs ‘corporation 
COMPUTER SYSTEMS. + a 


SANTA BARBARA PLANT 


BINARY ‘SEACH ise 


Syntax? BSRO 
 raenetes 


kkk hh kek &s chek ioliet oll 


# LALL £2 1000 910° ie 


th khkthkh heh kk keh 


—OP=CODE 


Function: 


a | 3- ty eae 

nae BOE ae COMPANY. ae es 

_— aneogss1709 SOL S*LANGUACE 
fe ee OPS Se #2201 2389 (Ld 


err rrer es 
* BSRC *. 


khkkiek hk 


| ae a operands are taken from the “EVALUATION STACK. 


oe The top. operand is the number of ‘entries to search. 


es The second operand 


= tae tee third “operand 


an every: 
ee The fourth operand, 


Ue Wine search key is 


is the search keys 
is the offset of the key field within. 
x, Sok Tipee ahantnee,”” 


ete  isti fied. for fo 


length of search: ean to. ‘the key. fiela. Tf a match is 
found a. self-relative bit. descriptor of Length 24 45 left 


on the stack with 


value equal to the occurrence 


number of the entry. with a -agatch. If no match is found 
the vatue witt ce the firse ney whose key is. greater 


tmao che ‘seach Rete. = 


35193 


GURRUUGHS CORPORATION COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP 3 7 B1800/81790 SDL S-LANGUAGE © 


SANTA BARBARA PLANT | | —  PaSe #2208 2389 (Ld 


“CHARACTER FILL 


kaktkh kik 


* CHFL « 


kKhkek kh hk & 
syntax? CHFL 
Format: 


kek ehhh kh kk kh ke kk 
® LILA 2h loch 109 «& 
tht tk hkkk kkk kkkh tk kk 


OP~-Code 
Function: | 


ae Two operands are taken from the EVALUATION STACK. 


b. The top operand is the sour cee and aust be eight bits in 
pengele > ts 7 | , 


Co The second operand 15 the destination. | 


de The source | descriptor may be self- relative or nonwsel f= 
| relative. 7 . 


e. The eight bits the source field is mscved leftcjustified | 
into the destination field» repeatedly» until theK 
destination field is filled. s: - 


3 “10% 


guarauens” CORPORATION ee on, ae Ge COMPANY oie eee 


— COMPUTER SYSTEMS GROUP 31800761790. SDL S“LANGUAGE ~~ 


(SANTA BARBARA PLANT OO PS. “#2201 2389 co 


FInd CUPLICATE. CHARACTERS 


kkRK KKK 


« FOUP ae 


hhh he 


Syntax? FOUP <Data \ddress><Cata Address> 
Formats. 


| 7 kee eeeeh een tk keh kktk ehhh ek kkk kh hh kh 
-o@ PAIL LL 10d CAL © LLOON ® LLeON © | 
nxt Ka RE RK RE eke kk kk kk kk kt ** keke 
— OP-Code | & 4 a 2 
| | ." : 
kkk kh hike 
nag | 
ae 
* ; 
Variable size depending 
on type field. . 


Function: 


ae The. text. ‘to be scanned Oi ae Gescribed by the — 
| first data Aes ae abs | - 3 eR ee 


bs The. second data address” describes ‘the. none ~duplicate text. 


ce The text will be scanned until three or wore duplicate 
characters are found. — 


Ge Upon. return the text: descriptor 1s mocified to descrite 
“3 the: eee Rave, texte - _ se 7 oe 


Ge “The non- duplicate text descriptor is nodified to describe 
| “Rn UP ieee text that Was Scanned. 


fe fier naeoer of duplicate characters Witt be teft as. a 2h 
pil. Pes on the ee. of the EVALUATION ‘STACK. ae.” © 


ax tha eupliicared: enamacter wilt be left as the Secon ites. 
on the Ev ALUATION STACK and wil be of type EASENC TERS 
Length 1. Paik g i | 7 


3-105 


BURROUGHS CORPORATION = © COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS. GROUP —* 3. * — 81800781700 SCL. S*LANGUAGE. 


SANTA BARBARA PLANT a | —_ _. # PeoSe #2201 2389 CL) 


DELIMITED TOKEN 


Syntax: 


Format: 


Chatneen 
* DIKN *# 


ke wekkk kt 


DIKN <Data Address><Delimiters> 


kkhekhikkhkk&kehkhkkkkkkhkkkkhk hk hkkich kk hak 


* 1111 11 1001 001 * LL-ON © | * 


tkkkhkhkkkhkkekhkk kk kk kk hhekkh keke 


OP-Code _ ft alae 
t t& . | 
eee 16 Bits specifies delimiter s 
« a en 2 characters) | | | 
- | 
. | | 
xt Variable size dependine on 


type bits tn this. precde. 


Function: 


ade 


The. descriptor ieavad: by data adaress is used to access. 
the ane source character. | : ; 


The address ae the first character as token” start. 7 


Characters are compared eauernielay. to each. of the eight 


bit delimiters. untit a match is ues 


Current addeess wilt point to the character “which matches 


one of the delimiters. 


| descriptor is left on top of the EVALUATION STACK that 


is: 


phe. Non- ~self-relative. 


2. The address 4S the address of token- start. 


ee The Length is equal to the current ancree= minus 


token starte — 


The address field of the NAME. STACK descriptor for first | 


character ts Set to the current pec anees © 


— gurraueHs c CORPORATION 
COMPUTER SYSTEMS GROUP — 


DeBLANK 


“Syntax: 


Format: 


DaLK <Data Address> 


kkk kkk keke kh kkhkk hhh kkk kh ik 


ok DAML 


‘LL 1901 010 * LLoON © 


7 ak« RRKKKHAKKE KEKE KKK EE RAK 


OP Code Cds ES 


an Ree ae. lana 
_#ke Variable size depending on 
type bits in this field. 


Function? — 


Ae 


The descriptor — eae ee “Dats “dane se> 


access the first sour ce character. — 


- Characters. are then passed seriatly until oa 
. character is found. — - ee eS | 


<Data Address>. a 


35 “106 =, : 


me company. “CONFLOENTIAL, 
Le a ~ gtavavatroa. SDL S*LANGUAGE 
SANTA BARBARA PLANT PaSe “#2201 23e9 CUP eS 


 kkkk hk hk 


« DBLK « 


eh ee ek ek 


is used to 
— non-blank 


eee addedes. of the first non nilonk character found 1s. oe 
tnto the address. field of the: oe ser uptar _ described — by 


| oe 3-197 
“BURROUGHS CORPORATION | COMPANY CONFIDENTIAL. 


COMPUTER SYSTEMS GROUP | BL 800/81 700 SOL S-LANGUAGE | 
SANTA BARBARA PLANT a P. Se #2201 2389 CL) 


INITIALIZE VECTOR 


eaeeeeee 
* IVEC « 


KRekk&nknrtk k 
Syntax: IVEC 
Format: 


kkk kkk &hkkk& hk &KkKkk kK ER 
* Lil] 11 1011 900 « 
kkk khkikhkkkk kk kh kk kkikk 


OP-Code 
See SSD for keys table format. 


are ee 


24 Bits  @h Bits. _ 24 Bits | 24 Bits & Bits. 


kkk kk kk kk kkhk kh kk kKkekek kk kh kh rk RdkKKERE ERE RRERERERE RE ERE EES | 
* VECTOR * VECTOR « KEY = * VECTOR «. 
* BASE * LEVEL.1 »* TABLE = & LIMIT * FLAGS * 
* ADDRESS * SIZE  * ADDRESS «& SIZE & s 


| RARER AE REE EE RE EERE OR re kk tekk keene kk ehh RARER REE RE ERE 


SCRT VECTOR 


2 9 ””~*«O 


tk tee a kkk kkk keke kt AK KRAE HERR ARR KR 
= 248 ss  ® ) VERTOR ELEMENT.L «. 
-. te kk RECORD. i 
* FLAGS * LINK * ADDRESS © 
‘ - * VECTOR ELEMENT.n * 


| RRR ee KK RE kek kk RE RE &kaA&K kkk kk khtkkkhk kt kkk d& kk & 


Function: | 


This operator is sisilar to ee re eee ae 


ees 


Pe re ‘The vector has never been initialized Chad ‘3. awinner). 


‘The initial value of the bit displacement into the 


Se Sloe 


 purRoucHs | CORPORATION Bee eal Fag aes COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP 84899781700 SOL S“LANGUAGE 


| SANTA B BARBARA PLANT. gre Shas oe P. 59 F220" 2589 CL 
| “vector 1s) zero Or. ) 


eee ‘Each new abide: 1s incremented by 64- (Vector element 
| ee “te a oe ed 7 Owe. Fa. 3 wae 


$7109 


BURROUGHS CORPORATION = . \. COMPARKY CONFIDENTIAL 


“Syntax: 


COMPUTER SYSTEMS GROUP = 8800781790 SOL S-LANGUAGE 
SANTA BARBARA PLANT =P Se HeAEL 2589 CLD 
NEXT TOKEN 


peekeewe 
* NTKN «* 


kKkKthehhkeke | 


NKTN <Oata Address><Separator> | 
<Numericwto~At cha Indicator> 


Format:. 


. RE RRR EE RERE EERE EKER ERE EE & & kaki hhekhkhh 


* Lill 12 1001 O00 *« LL»-ON © oe 


kRk&ke kkk kk kk kth kkkkkh kik kk ik && & & tkekkkkkhehh kh 


—OP"Code ®t 

. *  & . ~« -, 
& & kee L Bit 
* | Numeric™ to-Alpha 
« fi - Indicator 
& ® . 
tf zee 8 Bits» specifies a. 
bl qomarawe. 
* "3 
tik Vari apie: size. depending on 


AEYBE, in this fielc 


Function: 


de 


te 


The deccripear described ty data address is used to. 
access the first sour ce character. | | by, 2 


rane address of the first character is token-start. 


ae cRis: avaoactac is a “eyecial eer ocues Cless than "A" 
then set the current address to token-start +8 and go to. 


(g). 


a ca the. numeric-to- alpha indicator is set (i), then set 
_ stopper to "A". ee be ve , | | _ 
eed the numeric-to-alpha indicator is not set (0) and the. 
first character is numeric then set stopper to "0", 
| Uther wise» set ad to "A", hy <a a 7 


Sequertialty. compare characters te stepper until one is 


found which is. less than stopper. and not equal to “sepa-~ 


rater". The current address will point to this | charm 
| actere i e oS : am ° Bas | | | = 


“BURROUGHS CORPORATION tee te COMPANY. comioiincc 
COMPUTER SYSTEMS. GROUP EE EE a BLBON/B81 700 Sot S"LANGUAGE 


as: SANTA BARBARA PLANT Ta go ae ee $2 #2201 2589 cy 


oe 4 descriptor ite aki: bene dae 


ee eS 

Ee ee ae ee token-start.— 
3. The Length | is equal to the current address minus — 
i token~ starte i ar ee a eae a 

in Tae data- oMiceee for first character is set to the wat 

| ue address. -_ ae = "gies pe OM ea HY ay 


ao er SLE is. assumed that a special character such as "%" will — 


follow the image to be scanned» in order that scanning 
| se terminates 3 a ee 7 a a er ne ee 


REDUCE 


Syntax? RDUC <Type><Result.flag><Ubject>{<Result>] 


Format: 


ARR ERR Re Re RkKK EEE ERE RE Re nk TET eTe TTT rte Te Te Tes 


# TULLE LL WWGL Lol *  «® * & LL» ON * LL» OK «. 


kkk kkk kakk kk kk kk kk kk kkkkkhk ke kKkhekkkhkkk kh kk keke REEL 


5 ne 


“BURROUGHS CORPORATION =———=<CS*s*=“‘“‘—~*CS PANY CONF TOE NT IAL 


COMPUTER SYSTEMS GROUP. ai : BLEQC/BL 700. SOL S*LANGUAGE | 
SANTA SARE GOA PLANT — | _ ss P. Se. tee 2589 (L) 


kKhkht kt hh kth 


* RDUC « 


kktkk kkk k& 


GP-Code * * * Sos, 2 3, 
ie. kK = & « : 
ts *#&  & t tht Data address — 
te ke & * . | (Present if result 
fe ’~« oe _¢ flag 1s on) 
ot * ~ t | 
ne < fe te fe Data address 
tk x | . 
e+  & eke] Bit 1 implies result “present: 
& & 
i war | Bite 0 => Left-to-right scan 
« : ae | ss rightc-torteft scan 
ihe | - | 
ke 2 Bits 00: “nue 
es OL => NEG 
1G => EAL 


11 => IN 


. Function: 


ae The. geeacear string located by. the. etree data 


address — 


is scanned in the direction indicated for a SL agent 2 


which satisfies: a ‘prescribed CONS TEVON: 


She ES che: type is Fale an ‘operand is” taken — 


from the 


EVALUATION STACK which aust be @ bits in length. ~The > 


- condition is satisifed by a cutee ee saben 


sane as this. operand. 


2e If the type. is NEG? an operand. is taken as 
cases but the condition. is satisfied by a 


which 15 different from the operand. 


Se 6Ud ff tne cu INs the operand on the 
STACK must be of be Sreater. than 255° 


1s the. 


in the EQL 
character — 


EVALUATION ~~ 
bitse A 


(3: gene. 


- gurrousHs 1 CORPORATION ao JF ee COMPAAY erence rs 


COMPUTER SYSTEMS. GROUP es “BL e00/B1750° SOL S*LANGUAGE 
a BARBARA. PLANT ee Ae ee oe (PeSe #2201 2589 Baga timed ice 


- character satisfies” the condition. Sic chon ‘used: as ee 


| index. into. the. “operand. bic strings it. selects a eat 
which 1s one | | pare [eS ee ae 


NOTES If the operand Aca pat week: ae densi. 
ae. — fequirements+ an error. will he. generated» 


ere Ss The scan terminates mene either a character is: _founa 
satisfying - the conditions 7 the object string oa ee 
exhausted. At. eee pa ciaaee ec rea is left on... 
the EVALUATLON. STACK» a3(1)02 if no. satisfying character 
was found or a aCl)la if the character was found. ren 
additions — the descriptor. of eee. Cand that of fesulte 


if present) is updated? 


ig If the direction i is teft- corright: 


2. If the direction was right-to-left: 


P 

« 
il 

a 
+ 
x< 

+ 

& 


aaa 
* 
i 
re 
+ 
Us 
ad 


3-113) 


BURROUGHS CORPORATION = SC OMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP _ (81809781700 SDL S-LANGUAGE 
SANTA BARBARA PLANT 2 — PASs #2201 2389 CL) 
4 1s the original tie ce kid 


A is the new unaneas of object 

L is the original Length of object 
L * is the new length of object 

A © 45 the new address of result 

L "is the new length of result 


x is the difference between the address of the 
character satisfying the condition and the 
errant address of ee | | 


NOTE: Lengths here are “eat euvaved in bits even 

| though they are character strings. The type 
fieid of the result descriptor wilt always te 
set to non-setfrrelative CHARACTER. © 


COMPUTER SYSTEMS. GROUP 


Seance 


~ Syntax? 


LONKED List 


BURROUGHS c CORPORATION oe a ae ee “CORPAAY. ane rains 
= oe  abeceve17u0- SDL S- LANGUAGE 
6 SANTAL BARBARA PLANT nee ae a P. Se #2201 2389 ; iaade 


fe dete kk he te 


SLL<¢Compare Type> 


Format: 


TT TTT Te TT Te TTT TT TTT TS | 
e LLL2 O1 1010 8  & 


ee gees eects aeenee 


oS id Code se oe 


ao 
2 


ttt 3 Bitse specifies coepare type 


kik kh 


“the” compare type specifies the desired F relation. It is encodes _ 


as Bes 


furan 
| | 


Ows? Ze 


Greater than 

Less than | 

Not equal to | 

Equal to 
Greater than or. equal to 
Less than or. equal to 


Function? 


: aa descriptors are expectec to be ‘on the top. | 
EVALUATION STACK. These descriptors represent | the 


following items: 


Descriptor =  — Meaning — 


oe of ow ae ee oF ge ee a ty ose n owe 


First(top) | Lie Eoeation. 


eee ore . Compare Variable é 
Third a Compare Fietd Location. 
we Fourth | 2 | a Ee Aadress _ 


of the. 


oe he., Link ‘Legation. is a template which: describes” the fiela 
in the | structure which. ‘contains the base. relative 
adn ess, of the next structure to be examineds | 


371bS 


BURROUGHS CORPORATION © © COMPANY CONFEDENTIAL 


COMPUTER SYSTEMS GROUP .- BLESC/BL7CO SOL S“LANGUAGE 


SANTA BARBARA PLANT Pa Sa 82AEL 2589 CLD _ 


Ze Compare Varaabe determines the value to oe compared 
to the structure. its Length wust be less than or 
equal to 24. | : 


$e Compare Field Location is a template whose length 
field is the tength of the field to which compare 
variable is to be compared and whose address field is 
the offset Cin the structure) of the field to be 
compared against. The Length must be less than or — 
equal to 246 : | 2 | . 


he Structure Address is the base relative address of the 


ees structure » to he examined. — 


~The Linked List as Seagienoa until either the comparison 
succeeds = or. the end of the list is found. The last 


elesent of the list must have a link field with binary 
L's Ciceeeo AFFFFFES if the link field is 24 tits wide). © 


If the search succeeds» then the tase relative address of 
the current structur2 is left on the EVALUATION STACK as > 
a 24 bitwvatlue. ~ aa | 


If the search fails» then aFFFFFFa is the value teft on 
the EVALUATION STACK. > a | 


NOTES This operator ar not terminate if it. is. unable 
to make a successful comparison and cannot find 
the end of the fist Ca Link fretd of aft 1s). 


Synt ax3 


ike Was con ox ee a ‘3: “116 
BURROUGHS CORPORATION een ee COMPANY. pie er 
«COMPUTER SYSTEMS| GROUP eee ove1709 SOL S*LANGUAGE 

oa CORNER BARBARA PLANT) rr a ee rary S. #2201 2569 Cae 


snr SEARCH 


kik hk & & 


& SSCH ® 


wkkk kkk 


Sette et titer es tt er it 


# LTL4i2 


11 1611 100 * 


Id lalla ale 


OP- Code 


See SSD for keys table format. | 


Function? | 


ares 


STACK. 


This operator expects two items to be on the EVALUATION — 


As: The top. ite ‘is ic ulitee tie Gaede’ 


Bits 


‘25.The. Secnnd, woeetts the address of the search control — 


SEARCH CONTROL TABLE 


khikh khe kha ckhh kh kik kh && aeeeerestetiese sere ee Tete terete ae 


| CONTROL * KEY  * CURRENT « SCAN. se, RECORD” se 
_— RECORD «® TABLE « RECORD ye oe SIZE oe 


ADDRESS * ADDRESS. * INDEX” ‘COMPARE * & 


ee a. ee aa oe ee | ye TYPE le oe “ 


teen eeee ck ke eee ek es & CARRERE REE EEER ER REE ER ER REE RRR - 
. SCH. compares each: record (a buffer with, 2 control. 
. recerd on a ‘specified keys Se SG mel ee Sa 


oe eae ee coupared from: che top of ‘the buffer 
down cr from the bottom of the buffer Bee a 


the Sepih eks dated cS 


| : | _ Sr117 
- guRROUGHS CORPORATION — 7 ie Be COMPANY. CONF IDENTE AL 


COMPUTER SYSTEMS. GROUP. a ee “BLECO/B1 700 ee S*LANGUAGE. 


pe BARBARA PLANT. 2 4% 7 7 PR Se 201 2589 ab) 


‘1. LSS Cless than) #4 
Ze LEQ (tess than or equal to). 
3e GEQ Cgreater than or equal to) 


3e When a record is found that satisfies the comparison a 
| one (Ll) is returned» Otherwise a zero is returned. 


- 7E gunaaugné-t COR PORATION er a een yd CONFLOENTiAL 
COMPUTER SYSTEMS: GROUP Se aE e8O4 81700: SOL S“LANGUAGE 
SANTA BARBARA PLANT. or ee ee ee #2201 2389 hake 


sort stEe DOWN 


Syntax: SSD 


ARR RRERR RARE REAR RR ES i 
ro L111 110 1011 010 « 


eh ane ae nnne anne sees 


“OP= Code 


Et heats 


4 Bits  — . 12 Bits: 7 | -— a9 Bits 
ARR RER RRR RE RE ee CER RERR RRR Re ee 
e phe es AES ® er ee, | ct nn A eke ot 
es - -t- + = = eee es ee? ae 
[re er ere, ee | | 
Dele bale Solel Kot al tole! bi 2 
on ee Not ee Me, ee 4g WO Oe ie 
a ee ae ee gouge PRET ne ck | ee 
(ERROR Rene Eee Renae ne ea hee nek ek te nh et ek teen 


FLAGS LENGTH DE SPLACEMENT 


Function: — 


ae This, operator expects: three items to be on mestre ee 


. sT Ack eo. 


Be nT ie 


eke 
@ §$SD & 


wah hhhk 


aa The value of the: top item ‘is the key tattle address. 


heer The second. and third items are. ae Left and 


record addresses Peaeekt tenths 


bs thes teft and right records are ccmpared according to ena 
record 


- keys and return a value of one (1) when the right. 


right 


as greaters according to the keyse than the left eCOrds 


37i19 


BURROUGHS CORPORATION =8=8=——~S~S*CS PANY. CONF EDENT EAL. 


COMPUTER SYSTEMS GROUP ~ 


BLECO/BL760. SDL S“LANGUAGE 


SANTA BARBARA PLANT = ss—s—s—=<~SsSsSsSi Sw BBD LY 


SEARCH SERIAL LIST) 


 Synt axs_ SSL <Compare Type> 


Format: 


kkk thhkkekehtkekkkkhkk ehhh 


# 21121 11 1900 000 *« 


kkk thk kk tk hh kkkkkkkk kk hh kh 
uP-Code « 


* 


The. compare type specifies the desired relation. 
as foltows: we | | : 


i = Greater than 
aes than 
3 = Not equal to 
4 = Equat — 
2 = Greater than or equal to 


6 = Less than or equal to 


Function: 


ae Four descriptors are eect sd to be on othe | 


EVALUATION ~ STACK. These: descriptors — 
following items. | oe a ee |CCCg 


Descriptor | a .% Meaning. 


It 


First (top) | ~ t, Table iis 2, 


Seconaq Fars Iter 
Third os w= | Compare Fiela 


Fourth Fe Compare Value 


wee rkkkee 


* SSL * 


kkk ekki h 


ax 3 Bits» specifies compare type 


is encoded 


top of the 
represent the: 


"BURROUGHS CORPORATION wo copay. «eae Geuretice 
COMPUTER SYSTEMS. GROUP wg ge6o781700 SOL S-LANGUACE =~ 
SANTA BARBARA PLANT re Pa Se HEZOL 2389 ee 


seize 


<a fapte Length Sr ene Wee: of the table to. 
“abe be” searched. — _ i ee 


2. Compare | Value deteraines: the value to be compared to. 


_ the structures Its: tength can te greater than Bae 


- ne eee: Lice gives” ‘the Mengen. and eaarees at: wa eed 


item inva serial list af es cate eho ck 
. structures SE cele 28 3° ee a ee ee 


hy Compare Field: gives the Length: and the offset within — 


the structure of the field to which Compare Value is | 
ta be compared. | Unlike. SLbe the Length may. Pe” 
aacceees ee - cee ie. -_ | sia 


* athe serial. ise of. items is searched couangnine with first | 
item untit Compare Value Satisfies Compare Type with 
ae ea tear, are until” the end of the list is reached.— 


If the search succeeds» “Cheon che bint eben, “hea of. 
the item containing the "successful" compare field is : 
left on the top of the EVALUATION STACK and a L-tit. value | 


of 1 Cone) is. left as the second item on. the - EVALUATION 


STACK. 


oe the search tar les- then the end address ot the table + 


l is left. on the top of the EVALUATION STACK». and a l= bit 


eae: of 0 (zero). is left. as: the second, ites on the -EVAL- 


UATION STACK. 


ig ae 


BURROUGHS COKPURATLON “) ae “EONEARY oil eee 


COMPUTER SYSTEMS GROUP ARB 0781700 SOL S“LANGUAGE © 
SANTA BARBARA PLANT ee. — PeSe #2261 2589 CL) 


SEARCH SOL STACKS 


7 K$kkkik 
 & §$5S «. 


kkeie kkk tk 
Syntax: 355 


Foraat: 


tk kkk kk kk kk khik kkk 


* 1111 11 1110 O01 « 


cthkkkkiktkkkk kkek kh tt 


OP-Code 
Function: 


a F our operands are removed from the EVALUATION STACK. 


 itak: (top) - Compare Base 


Second = == Compare Top 
Third  * Stack 8ase. 
Fourth = Stack Be uke 


be The. stack to be searched will consist of “SDL descriptors .__ 
and wilt be searched from base to top Cor vice versa) for 


a simple descriptor whose address ties between coapare 
base and compare top. , | ‘A " 


ce Array descriptors: and selfrretative descriptors may be ~ 
ignored. — a a | | | : 


| de If the eear eu: 1s strccosetul ‘ign a one tit value of C1) 
a is left on the top oe the EVALUATION STACK. ns. | 


e. If the search is not sucess ful then a one tit gate of 


(O) 1s left on the tog. of the EVALUATION STACK. — 


~ gurroucHs: cORPORATION, = “corpany CONFIDENTIAL 
COMPUTER SYSTEMS. GROUP) S””S~™~*C( BGO ‘SDL S"LANGUAGE 


SANTA BARBARA PLANT ae are ee eS re20r 2389 wy 


 Synt axz 


3 nie 


- “sort. SHAE 


an 2... 2. 2 2 


*« SSWP ® 


tel a2 2 2 


SsWwP 


Format: 


the ktkkkhk kk kh kk kkke 
# PALL LE aGaib LOL «| 
Rkktkhketk kk kk kkkkh kk kk 


— OP -Code 


Function: — 


as 


This operator pops two ‘operands off the EVALUATION: STACK. 


The values. of ‘the two operands are | intercharged Spieneut 
regard ba types a a oe ees . | 7 


“When. the ‘two fields are of. cecal penaene the swap is 
Limited to the Length of the shorter field. The longer — 
field is filled. froe the lefty tow order bits are undise 


 turbed. 


Synt ax: 


Format: 


$-123° 


BURROUGHS CORPORATION = = = ~——_—s SO MPARY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP bes | BLeONsBL700 SOL S-LANGUAGE 
SANTA BARBARA PLANT a ca ps. H2201 Ban: wis 


‘THREAD VECTOR 


wKueaxk&Kka&KKXK 


*« TVEC « 


kik hkk&i kick 


TVEC 


Vicedewague une eee ke 
@ LLLL LL AGLL OOL ® 


KR KKEKEKER AKER 


ae 


Ce 


OP-Code 


See SSD for keys table format. 
See IVEC for vector table forsat. — 


Function: 


This operator expects two ‘items to be on the EVALUATION — 


le The top item is a bit displacement into the sort. 
- wectors where the two vector elements to compare 
| reside. an ar: | , 


De. The second item is the address of the 100 bit vector 


— table. 


The operator then compares the two | vector elements. 


Caccording to the sort pevee and stores a wirner. 


When the store address is equal. to the vector Linit the 
EVALUATION. EDEN is cut back and the instruction pointer | 


advancede 


“ahem eehe store addeess: as not equal. to the vector piste? 


the bit displacement 1s updated and the EVALUATION STACK 
and program: pointer remain Unewengeds : 


-— qurroucHs conPoRaTon:. = Se “COMPANY. CONFIDENTIAL 
COMPUTER SYSTEMS. GROUP eo ee BU CORTBL RRO: SOL S“LANGUACE | 
eee BARBARA. PLANT. Geese, setae Sone eee es 2 SBI» ice ie 


 Synt axe 


SORT unaLock 


eee BE a 


keke 


usLK 


Peewee: 


BeTTTTTTTTiT Tate Tet T coe 
# LAtL Lh LOLL O1L & 


RRR ARK EK KK ha he 


ae 


OP-Code | 


This. “operator Waadies ipuece van a fone sort Loner ahorce 


It moves data from a source fiela to a Pestunat ron. field | 


and: moaates the blocking characteristics. — 


he 


Lads 
| — is. returned. — 


Four items are “expected on the EVALUATION STACKS 
aot The first: iten is the destinstion address. 

“ae The secénd™ ites is the source aderesss | 
3. The third item is the lergth of the data “transfer. 


Petes fourth “queen is. the addrass of the Wesemnennee — 


. Fib™. 


, When the ‘block count goes. to zero cc) a. value of. one 2D 
1s. EE Ur Tats, , _ | : | . 


when: the block ‘count - is other than zero a sais Glee 


og Oa 


BURROUGHS CORPORATION = = = = = =  ————s COMPANY CONFIDENTIAL 


— COMPUTER. SYSTEMS” GROUP ; «3 BLAG0/91700 SDL S“LANGUAGE © 
SANTA BARBARA PLANT | Oe | , | Pe a #ce201 Cour. ee 


TRANSLATE 


Syntax: 


Format: 


khkkk& kh kt 


# XLAT # 


 w&kkk kkk k 


XLAT 


EEOC EET TEC OT eee 
* 1DLlt 211 #1110 101 « 


kkk kkk he kk kk khkkk eK KK 


CP-Code 


Function: 


de 


Five cperands are taken from the EVALUATION STACK. 


be Descriptor for. the: result field. An address. oper 


and). 


22. 4A self-relative descriptor whose value is the size of. 


the items in the result field and in the transtate 


table. 


oferand)e 


4. A self- relative descriptor whose value is the size of 


the. iteags in the source field. 


5 A jeseniarak: for the source fietd. (An address oper- 4 


and hs 


This process continues until 


1. The source field is exhausted. — 


2. The result field is full. 


3. An error occurs (esd. translate error)s 


3. ‘The translate table. (May te a value or an address — 


€ack of the items in the source field is used to 
subscript into the table to obtain an item which is then 
placed into the result fieto in the position. that corre i 
sponds to the position of the original item obtained from 
the SOurCee | | | | ey eS 


BURROUGHS CORPORATION SP east e, Hs ‘company eT 
COMPUTER SYSTEMS GROUP BL809/81700 SUL S-LANGUAGE 
SANTA BARBARA, PLANT ae Pict eee PS Se 82201 2389 CL) 


3° “126 


tf either the. source. or the result a not” a wortiate OE. sk 
its respective. item size ther the last item ‘translated or. 
the fast translated value will be truncated as requireds. 


Both source tad table item sizes ust. be equal to or tees 
than 24 bits , Vas Lengths otherwise. a run- time mney, 
occurs. Se e “gem | | 


The. table. inesd daly be. ianace enough tc comeodacs those 

- items. which. with actuaily appear in the source. That ise. 
the upper end of the table need rot be. present if it wilt 
never be accessed. Howevers attespting to access a table 


item which is beyond the actual size of the _ table will 
| cause a run- time errors | rn oe 33 | 


(3-127 


COMPARY CONF IDENTE AL 


BURROUGHS CORPORATION | 
Biacc/Bi700 SOL S-LANGUAGE 


COMPUTER SYSTEMS GROUP 


SANTA BARBARA PLANT = Fy tag PeSe 2201 2389 CL) 
HISCELLANEO 5 OPERATORS ar mh 
NAME . 7 ; “HNEMONTC e uP Cane | ARGUMENTS 
TRANSFER NESS AGE a KF RM ati i 1619 010 ODEST.VARTABLES 
- | ae SOURCE VARTABLE 
HASH CODE HASH 1111 11.1000 601 
HASP UNPACK WASP ALLL Uh AiLh tot ‘LLe On 
SWAP SWAP Lilt 1 D110 
FETCH FECH 1111 69 1100 
DISPATCH DISP = sLALL OL LCL! 
HALT HALT Lid LL 9010 
READ CASSETTE, 7 ROCS L111 O01 O10 
LENGTH © LENG 1111 1¢ oc00 
LOAD SPECIAL LSP iit OL L420 VARIANT 
NCL SOPs NOL L111 UL Liat tto” TYPE, #CESC 
CLEAR ARRAY cles AL 10 O18 
COMMUNICATE coMM 1111 10 0119 
RE INSTATE REIN LiLt 19 0901 
FETCH CYP FCMP 1111 16 GoL0 
QATA ADDRESS ADDK “LLLL OL LOo1 
DATA LENGTH DLEN 1111 11 10600 101 
DATA TYPE oTyP 42tat 11-1990 110 
SAVE STATE SvST.sLLLL LL 0001 
-HAKDHARE MONITOR HM ON Litt if OOLL 
“AVERLAY avLy L111 11 OC90 
PROFILE PRFL 4111 10 1111 ENTRY NUMBER 
PARITY ADDRES S PADR ALLL if gail 
“EXECUTE -_ 72 EXEC L1id QL LtL9 c1¢ 
COMMUNICATE WITH GISMO CWG 1111 11 1110 110 


i: Ss - fo, ot pony eae 3 3- size 
- GURROUGHS CORPORATION bee EE fe | ComeawY CONETOENTIAL 


COMPUTER SYSTEMS GaouP pare alecosei790” SOL S*LANGUAGE 
SANTA BARBARA PLANT ee Ne PeSe #2201 2389 CL) 


os SUBTRACT TIMER a : ASUS TLLL 11 Liee ool 


(5029 


BURROUGHS CORPORATION = ——s COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP =  —-BLeGOVBL700 SUL S-LANGUAGE 


SANTA BARBARA PLANT = = - Pe Se #2201 2389 CL) 


DATA ADDRESS 


kKhehkhkkke 


* ADDR «& 


kkk kh kk 
~~ Syntax: ADOR © 
Format? 


a&axk&k errr ree Rk & & 
* 1111 61 1691 *- 


Ieee eei eerie eee s | 


OP -Code- 
Function: 


a» A descriptor is expected to be on the top of ‘the EvaLuas 
| TION STACK. This descriptor must be: 


) Rae 


‘1. Non-sel f-relative 


2- The name~value bit must be off. 


be. The type. field of the descriptor is set to self-relatives 


--e. The Length field of the descriptor is set to 24. 


~~ puarousus: 


DATA LENGTH 


Format: 


tkR RRA ARE Ee Trt TT rts 


“e LLIL G2 1000 LOL «© 


Ake hhehaknee hhh khkhh an 


OP “CODE 
Function: | 


is. expected 
The. descriptor will 
descriptor — of tength 


se descriptor 
- . §TACK.. 
. BIT . 


| Eengep of the SENOS. descriptor. — 


_ corporation 
te COMPUTER | ‘SYSTEMS. ee es 
SANTA BARBARA PLANT | 


bo. 
be replaced by. a 


3: “180 


eset SOL. 


ken eeane 
* DOLEN *® 


kk kk kik 


on top of. ce EVALUATION 
self-relative 
2h with a walue: eauet to the oe 


be. 


COMPANY. somal tamutetee” oats 
STLANGUAGE 
220k 2389 ae 


BURROUGHS CORPORATION 


COMPUTER SYSTEMS GROUP. 


SANTA BARBARA PLANT 


DATA TYPE | 


Syntax: OTYP. 


Format: 


RE REKKEKERE KKK EER 


-# LILL 11 1000 110 « 


ARREARS 


‘OP-CUDE 


Function: 


A descriptor ts expected to 


| 3-131 
— COMPARY CONFIDENTIAL 
BLECC/B1L700 SGL S-LANGUAGE. 
PS. #2202 2389 CL) | 


taneanue 
* QTYP « 


kkk hha 


top of the EVALUATION 


STACK. The descriptor will be reptacec ty a self-relative 
BIT descriptor of Length 24 with a vatue- oot. tc the type 


bits of the eerie descriptore 


(aura Ucn “corPuRaTioN Bes ate -COMPARY. tae garnet ore 
o COMPUPER. SYSTEMS: GROUP. ee ee, 81809 /81700. “SDL S“LANGUAGE 


SANTA BARBARA PLANT Gas Pass fet 2389. a 


ato TIMER? suarRact TIMER: 


PrereT Tre TT err 


® ADOT ® SUBT ®& 


ee ek hh tk 
Syntax: ADDT <cell number> 


SUBT <cell number> 


| 8 Format: | 


ADOT 
Tee TCST SCS TTTT TTT Te eT ete Te ee 
* LLL 11 1160 GOO * | tt 
Ake thkkkkkkkkkehkk keke kkk kkk 
OP- Code ke 8 
; ie 


ee 16 Bits specifies cell numter 


suet 


. Ree RAE RE ERE EER RK REE kh & 7 


—® 2411 11 1160 001 * ay? 2 o@ 
Ree e hhh kek kkk kkk hk tnt af 
GP-Code * | 
 #€* 16 Bits specifies celt rumber 


Function: 
ae” This operator. Seciwes that: DISPLAYC 18) ‘points ta cell 
ns zero. ay an se of weebit cells. a | Shae oO 


‘be arhe eat nuaber is used to sudseript into the array to | 
Locate the. indicated cetl. | oe oa i» 


ee The. high-resolution. timer et en a 
tae _ indicated cell. : che ee, Se ee _ ee 


oe de An sajusenent wit be made te the timer to exclude the 
time required by. the One raneG from ea included. ain ENE I 
peek time. | | oe 4 : | 


ee TF no high- eesotul ven’ timer is present on the ~ systems 
a then this ‘operator le not “ehange. the ees. cell.” | 


BURROUGHS CORPORATION — 
COMPUTER SYSTEMS GROUP ~ 


SANTA BARBARA PLANT | 


CLEAR ARRAY. 


Syntax: CLR. 
Format: 


AkKEAE RE RAE EEK 
* L111 16 O111 « 
RARKKEKEREKRE RE KK 


CP-Code 


Function: 


ae The descriptor 


$7135 


COMPANY CONFIDENTIAL. 
-BLe0c/81700° SDL S-LANGUAGE 


(PAS. #2201 2389 (L) 


kk kh ee 
*« CLR « 


kahit kkk 


on top of the EVALUATION STACK must be a 


non* paged array descriptor. 


be When the array is of type CHARACTER. the array elements _ 


are t lank filled. 


Ce For any other data mY PES the array elements will be zero 


COMMUNICATE 


tk kkk keke kee 
# 2111 19 6119 «* 
kkkhk keke thek kkk 


CP- Code 


aes The. descriptor, on. the. top of: the. EVALUATION 


er eg te Se ae as ee De, gle 7 ee, - 33 S136 
— gurroucHs. CORPURATION ote Sper ent: peal 6 


COMPUTER SYSTEMS. croup eae BR EBODVE1700 SOL S- LANGUAGE 
SANTA BARBARA PLANT =" “Spa ee Fade: we2on 2389 CE 


MEER EK: 


© COMM * 


kh he ht 


STACK: is 


added to the. base register and then moved to RS CUMMUNI~ | 


CATES WSG. PIR. 


“hh When” the name> value Bit is one 48 6 cones on 
RS. COMMUNICATE oMSG. PUR. 7 -_ 


in the | 


t tig. descriptor as removed trom: the EVALUATION STACK ang 


the VALUE STACK is cut. backs a necessary. — 


Cea ine aewac hing: state is storec in the appropriate parts eet 


the KS.NUCLEUS. 


«BASS 


“BURROUGHS CORPORATION, =  COPPARY CONFIOENTIAL 


COMPUTER SYSTEMS GROUP. pe BLEOO/B1 700° SOL S"LANGUACE. 


SANTA BARBARA PLANT = PAS. #2261 2389 CLD 


COMMUNICATE WITH GISMO 


ttkhkkh tk 
& CWG «& 


Kkkek&kktk 
Syntax: CWG 
Format: 


kk khkkkhkhk kek kh th 
*® Lill 11° 121216 110 * 


kRkek kkk kh kk kh hk kk hk kek 


—uP-Code 
Function: 


ae A escrito is expected to be on the top of the EVALUA- 
TION STACK. | 2 ae oe ke ee 


be If the descriptor is self-relative it is | made non- self- 
— relative by copying PEs data to the VALUE STACK. 


ce The address field. of the descriptor is nade absolute and 
placed in the es registers : | 


de The ‘Lenath field 1s placed in the it estanieles 


ee A Swapper value of 14 is placed in the "x" register and. 
GISMO is werner i : | | a re 


te rhe deseriptor on ‘the EVALUATION STACK is not removed. 


 gurzoucHs: corporation ‘COMPANY: -pniereenteme <0 
~ COMPUTER SYSTEMS GROUP = © — Bhescsal7a. SOL S*LANGUAGE 
SANT AL BARBARA PLANT Me, gt e fae ye tHe eee g2201 2589 Cy 


on ‘Synt axt 


 Format:— 


3- Sse 


| OTSPATCH 


ea ak ee ak. 
* DISP * 


Ci lieli leita 


‘Disp 


kkk kkk hk kh kk 
# LILLE OL LGLL & 
kkk kkk kkk kkk keke 


- OP-Code 


| Function: 


bs The. top. operon” as an- address “operand, of the 170 
_ descriptor to be dispatched. > wena 4 2% = 


de) These oe oaneande: are passed as parameters. to GIsMoe 


which then Pon tOnes: the ‘1/0 operation. 


Two, operands are. removed from the EVALUATION | STACK. 


The tow order 7 bits of heh: meee eben “Minh Me te 4 
encoded as follows: | | = = S ee 


kk kkk RERE RR 
rr re 
RRR RK 
te ren ae 
oar 


eee 4 Bits» specifies Channet — 


oe 


a weed Bitss specifies Port 


GIsuo. returns a value neh: describes” the results of ‘the 7 
7 _ dispatch. | A 24ebit. self- relative descriptor. is teft on 
the EVALU AT IUN Pee The value has the following  _ 


1 


Dispatch pegicter: laceaue oit ‘set 
Successfut dispatch i 
= Successful dispatehs but missing device 


ie 


QO. 
Al 
A 


ob it 


37137. 


“gurROUGHS CORPORATION ——™S COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP ©” ed BLECOsBL7OO SOL S“LANGUAGE 
SANTA BARBARA PLANT si | PeS. #2201 2389 CL) 
EXECUTE | 


kk ee kee 
 & EXEC «#. 


kRkk&kknkekk 
Synt ax: EXEC 
Format: 


kek k&hhkbkk kk kkk kh eh 


* LATL LL LLLG O10 * 


RewRAKKH HH KA KKKK KR KK 


OP~Code 
Function: 


The vatue of the top operand on the EVALUATION STACK will be 
considered to be the next op=code to be executec. This is. for. 
the testing of experimental opcodes in the interpretere- a 


This operator is not in release interpreters. 


be 
Br 


gerde > 


"BURROUGHS CORPORATION Cao he teh -COPPAAY Pace rt te 


COMPUTER SYSTEMS | cRouP Ct ‘BLeoosaL 760 sol S*LANGUAGE 
SANTA: BARBARA PLANT ue 7 eee eT #2201 25e7 EE 


FETCH COMMUNE CATE MESSAGE POINTER 


errrece Ts 
& FCMP « 


cites 2 2 oe 
Formats 


eke keke he keeek heh 


me LLLL 19 0019 @ 


kkkatk kh ekkk hk & & 


oP- Code — 

. Hain 

ae If the RS.MCP.BIT ee a 
- is accessed. af Se as eg Es Me ie | 


be The RS+REINSTATE « NSE. PTR is. accessed. 


ee The accessed field is. assumed ‘to te d descriptor and isi <G. 


ehacee, on the top of the EVALUATION nee 


BURROUGHS CORPORATION: 


COMPUTER SYSTEMS GROUP 


5-139 


COMPANY CONFIDENTIAL. 


— BLe09781700° SOL S“LANGUAGE. 


SANTA SARBARA PLANT . |  PeSe #2201 2589 CLD 
FETCH 


kKkkkhk kk 
* FECH « 


cKkhkakak 
Syntax: FECH 
Format: 


wae See seiee ee cess 
# LELL 9O LLOO * 
Ree heh he x*& bal de 


GP- Code 
Function: 


ae An apenas is eee from the EVALUATICN STACK. Its value 
| ‘ indicates which item is to be exagined cn the. Interruot — 
) , fiueue (refer to the ACP manual). | 


9 => Use the top item | 
~l => Use the top high priority interrupt time. 
Otherwise the vatue is the reference 
address +24 of the result descriptor . 
desired. | | : | 


b- Two descriptors are left on the EVALUATIUN STACK. 
Le The top item is a Bit (24) self- cebavive data’ item 
3 whose value 15 the address of the desired 1/6 woeuee 


descriptor. 


The second item is a Pit (12) self-relative data itee 


i. 
@. 


which is changed to Bit (24) whose value is the port — 


and channel of the I[/0 oferation. 


This has the 
following format: 7 _ -_ 


tk kt kkk kh ke AREER REE EERE ER ERE EEE KkKet | 


* Unused | BITCL) «* 
* M MCP barar nant . BITQL) «* 
i High Priority Interrupt | BITCL) * 
* Validity 7 BITC1) * 
* Not 1/0. Channel ope, BITC1) * 
* Port. : : -BITCS3) «* 
« Channel | _  ~BITC4) « 
SAcean rear ee RRR R EERE RE ER ERR EERE EEEE 


- euakoUGHS « CORPORATION — ee at COFPANY. CGONFIDENTEML 00” 
COMPUTER SYSTEMS GROUP. my ee | 


oe S7L 4G | 


: :  gheceyan700 SOL S-LaNcuAcE 
| SANTA BARBARA PLANT eh mens 


a ites is: removed from the: Interrupt Queue. 


ae eo the. ater: “Ouweue. was. emptye then both descriptors 
Oe have a watue of zero (Od. —_ A SS ERE tee PO 


“PaSe W22G1 2509 (Ld 


BURRGUGHS CORPURATION 


COMPUTER SYSTEMS GROUP 
SANT A. BARBARA PLANT 


RALT 


Syntax? HALT 


Format: | 


pene aw ee cene 
* LL11 11 0010 «. 


&kkakhkkkhkkk hikh 


 OP-Code 
Function: 


ae The M=-machine 


the RS o NUCLEUS. 


b. ‘The low-order 


ce Thts operand 
. Mrinstruction 


state 


Stal 


COMPANY CONFIDENTIAL 
BLE@00/381700 SDL S“LANGUAGE 


(PeSe #2201 2589 coe 


kkhhkhkhh 
* HALT « 


kik kkk kek t 


is stored in the aprropriate parts of 


(Refer to the HCP wanual). 


24 bits of ie aba lie operand on the. 
top of the EVALUATION STACK» is moved to the Trregister. 


is popped off ene EVALUATION STACK and the 


"HALT" 


Ss executed. 


ee 0 


— aurraucHs | CORPORATION, =—ss—s—<—~s—sS (CONFIOENTEAL 


COMPUTER SYSTEMS SROUP og, Ge spiegovetres: SOL. S*LANGUAGE | 


SANTA BARBARA PLANT eral tia a A age: ae201 5Ry oe 


On ASH cupE. 


Rh khk kt hee 


&* HASH «& 


a 2 2 2 ee 


— Syntaxt HASH 


Format: 


eeerrrerr Tere T eT ers 4 
ee Lill 11 1090). O01 e 


kkk ike kek ih ak kk tt at && 


— OP-Code 
Function: 


ae The: algovivhe for generating. ane hash. code can best be 
a poeece Ieee by. an SOL enc ede: oe a 6 oe 


- PROCE CURE HASH. CODECTOKEN) BIT C24y5 
-> FORMAL TOKEN CHARACTER: VARYING 5 : 
DECLARE 
(kT) BIT(24)> Ete? 
— C -  CHARACTERCL)»® 
JL HASH BITC27)—5 
an 02 FILLER BITC3)» 
ae oe area BITC24)3 | | ar ee 
IF CHASHS=L2=LENGTHCTOKEN)) > 15. THEN. ‘Le 2153. Tf239° 
a £8 DESCRIBES | THE CHARACTER PRECEDING TOKEN *#/ 
— -DESCRIPTOR(C): =934890083 CAT — | 
DATA. ADDRESSCTOKEN) “83 
OO HASH.IT FOREVER; <7 | 
7 IF & <BUMP T THEN RETURN TOTALS 
BUMP. TOTAL C-¢T co 4)] BY NEXT. LTEMC ODS 
- oe END HASHeILTs 
END HASH.CODEs. 


be Each | hacacter of TOKEN is eeiaae Pike adjusted. jn. ane 


field of zeros” and adced to ATS in one of four posim 
fionse - Se tee _ 


«SANTA BARBARA PLANT 


BURROUGHS CORPORATION — COMPANY CONF 


S-145 


IOENTIAL 


COMPUTER SYSTEMS GROUP = = = BLASOsAL7U9 SOL S-LANGUAGE 


P.Se #2201 


2389 (CL) 


Rkhkkkkhkekhkhk kk kehkkhkhkhkhhk kk ke hkke kkk keke hk kk ekkhhihkik 


ke € | * ot | a te ie x 4 * HASH 
AKKREKAREKKA EERE EREE EER RRR hhh : | 
_* _ am OSH erase seeess sy et -_ * T Mod 423 
KEKE RAKRKE KEKE AKER RARE KEKE KKK Rh KE | | 
| t (ress seersase een @ |  & T Mod 4=1 
thet kk kk kkke kk ehhh hk kk kk kk kekk heheheh hkkhehk hee : 
ft Jomewensceweenny & C = «* FT Mod 4=2 
tke kkk kk kkk kh hk kk hhh kkk kek keke kh kkk keh hk kh ee _ | 
a Qa eceeerenennrn-G ® CT Mad 433 


Ree REKEHAKRAKRMKeKMa RK Khhkke keke ki hkhkk 


“ puaauuoHS coxPoRaTion ie ee ae oe COVPANY. cone idearine 


COMPUTER SYSTEMS” tag a =  BLeoevAL7G0 s0l Ss eae 


hema es - 
 # HASP 8 


fete Sete hehe tee 
Syntax? HASP <source>. 


Format: 


RHE RERRERERR ER AR REDE RE RE REE _ 
# LILLE LL LLAL LOL ® LLoON © 


RRR RE RK tk tte 


This operator wilt unpack a aata buffer according: to ‘the guide 
tines of the HASP datacomm tine discicline. One description is 
expected ta te on the VALUE. stack. describing the field which is 
to receive the first record in the tuffer described ty LtL»UNn. 
The source .is expected to te a reference variatle since the 
descriptor for the source is modified to cescr ite the remaining © 
unpacked portion of the buffer. | : or. | 


eh operator wit return one of three on the EVALUATION STACK : 


1 akg = NORMAL | 
od = EOF DETECTED 
(2 = ERROR. 


EOF will indicate the Logical end cf the ite being transmitted 
by the host computer and of the end of the tuffer being unpacked 

(this is indicated by the header of the unpackec recerd). ERROR 
wilt be returned whenever some fault with either the source or 


object fields is detected. This includes a nulls incomplete or 
invalid source field and an object field too short for the. 
result. © A normal return ty this operator will return the 


anpacked record prefixed by a 23 Dit. record header of ihe formatz 


STREAM_IDENTIFIER QITC3)>5 
— - RECORD _TYPE_ LOENTIFIER BITC4)» 
SACRO  -BITC8)> 


UNPACKE D_ RECORO_ LENGTH —BLTCaD 


peter to information on the HASP bueter:. format © for an exact 
| definition cf the. format. for a ASE’. data tuffer. teh = 


“2° Las 


BURROUGHS CORPORATION = =3=3=——sC§ COMPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP © a ~ 81860781700 90L S"LANGUAGE 


SANTA BARBARA PLANT Pe Se MEAGL 2389 CLD 


HARDWARE MONITOR 


kKhkkhk kk kik 
_* HMON * 


kKikkh hh & & 
Syntax: HMON 
Format: 


ReaRKKKKKKKEKREKEK 
# LL11 11 O911 « | 
— RERERKERRRKKK KK KEE - j 


CP-Code 
Function: 
ae An operand is taken from the top of the EVALUATION STACK. 


be The low order eight bits of the operand's value will he 
| used as the operand of a monitor microvinstructione | 


| tener 


—Syntaxs 


Format? — 


| * = a ee “36 146 we 
— gurroucHs. “coReuRATION, = — coppany cawerbentiats 
oo SYSTEMS | ee ee 7 


—T77s 7. 7 2 


kk hh kk tee 


‘LENG | 


AERA RRR 
—* 22121 10 0609 «. 
: ke eke ee eek eee 


 OP=Code 


Function? - 


an operand is taken froe the EVALUATION STACK. 


AS ere come D bit: C24), result: is returnea ‘to ‘the top 


of the EVALUATION Ent 
er the apenaaa was of type Sicilia dnlacce. 
the result is equal to the length field in the oper- 
and's descriptor divided by eight« : eo re 


When Nes operand was of any type ather than CHARAC- 


TER» the value is equal to. the ae? field in the 


operand 's: Cesena ples = 


© 8109781709 StL ‘S- peri ace 


BURROUGHS CORPORATION. 


COMPUTER SYSTEMS GROUP 


— SANTA BARBARA PLANT - 


LOAD SPECIAL 


Syntax: LSP Variant 


Format: 


s-147— 


sean etree SOL S-LANGUAGE 


P.S. #2201 2389 CL) 


kkk kKKK 


*« {SP «& 


kak kik&kSE 


chk eke kk kkkekkhk he kkk 


* Lill O1 2110 * 


k 


REKRARAKKHKKKKEKKKKKKKKEKK 


CP-Code 
eke 


Funetion: 


ae The variant 


5 Bit Variant indicatirg value tc toad 


field indicates a value to be beaded to the 


top of the EVALUATION STACKs usually as a 24 bite self- 


eras data 


Variant 


CVCaANDUFWNR © 


item. 


Value 


fase register Cabsolute address) 
Limit register Chase relative) 

as Memory size in tits 

M-f#emory size in tits | 

CONTROL STACK top Chase relative) | 

EVALUATION STACK top (base relative) 

CONTROL STACK size in bits | | 
NAME STACK top Cease relative) 

DISPLAY BASE Chase relative) 

CONSOLE SWITCHES 

SPU. INPUT. PRESENT 

PROGR 4AM. SWITCHES 

CLOCK | 

PROGH AN*S PROCESSOR, HiME, 

~—6T IMMER REGISTER | | : 

LAST -LIO_ STATUS | 


COMPANY CONFIDENTIAL 


3- et ae 


_ auReoueHs - CORPURATION oe te fae ee CORPANY. “CUNFIDENTEAL 
— COMPUTER SYSTEMS GROUP _  akeonsai7es ‘SOL S“LANGUAGE 


SANTA BARBARA PLANT Pod van oF Ae alee e2e1 2589 CL) 


nee S-OPS. 


tekikke 
& NOL «) 


ae ce 2 2 
‘Syntax: NOL <type> <number of descriptors on the stack> — 


Forest 


Reh Rh ke kh kt kKkekeR KK KK i & fee he he eb ue ke 


~ *# LLE1 11 1111 219 ec 


kk eke khhkhk eee et cere ee & fe. ae hte tok 

a * 
~~ fe : + ls Sow ae 4 - 

ie ee kh oitse the number of descriptors 
placed on the value stack for this | 
oe 7 sogeranar <. kA : 

en. gee 
*% 


tee 8 ‘bitsy the type of action to be performec. — 


This operator wilt perfors ‘operations. previsusty: ‘done by s~ Codes : 
jn eel a It ‘should ond y. be used by NDL as it. expects: the. 


NAME and WALUE stacks to be configured in a very rigid manner. 


Tt will read and write data directly in the NAME and VALUE stacks 
of the NOL program. Generally> this: operator > is used to 
ieeaeerick I0 descriptors» process [ft descriptors following an Td 


complete» — examine message counts for messages —queued— for ae 


particular station within the network cortrollers change stations. 
“Line and. terminat. indexes and scan received dat? buffers. 


this operator oe a vatue. on the EVALUATION STACK (of 


ce vary ing: sizer ae upon. the type. of” action beforacd).’ 


BURROUGHS CORPORATION 
COMPUTER SYSTEMS GROUP 


| SANTA BARBARA PLANT | 


“OVERLAY 


Syntax: OVLY 
Format: 


RKEKAKKE RARE RK 
*# LIL L1 0900 * 
KRAEMER RAK 


OP-Code. 


Function: 


oe oo 


“CORPAKY CONFIDENTIAL 


—B1e90 781709, ‘SOL S*LANGUAGE 


kik kh kt & & 
* OVLY « 


kKhhke kk kh 


ae An operand is taken from the top of the EVALUATION STACK. — 


b. The value of the operand will be | usec. by GISMO as an 
index into the interpreter. dictionary. | 4 


Ce The. faveroreter dictionary wilt ‘speci fy. the action to be 
| taken. “treves to the B1LB09/B1796 MCP manual). 


3- “153 7 


 RURR ROHS: CORPORATION. yee ee ee “COMPANY. ~ phubieeari 


COMPUTER SYSTEMS” GROUP. BE RONZBL7G9 SOL S“LANGUACE 


SANTA BARBARA PLANT oe eer er ae ee Se #2201 2349 a 


— Synt ans. 


| aEAD CASSETTE. 


Rk kk hk ee 


ROCS # 


arererrras 


ROCs 


Format: 


ee ek ek ke ke 


— # LUTL 01 G01 * 


| kee RK ee kek kk ih 


- OFF ns 


Function? — 


ae 


ees: operands are expected to be on toe of the FVALU4- ; 


TION STACKS 


top: ites ae address bse and: ahere: a one. or. zero is to be 


stored according to whether a hash total read from ane 
— . tape. ‘is wea or bad. | | ; 


' Second — item oe A self- ‘relative ate cf one hae 
— total: is to be read from the Wanes etse zeros . 2 


third — ice -~ an addr es Ss “operand where cata from the tare 
4s to be stored. | : | | ce 7 | 


The following conventions appl ys 


Vines ae least one record will be read. 


is i ueeiebaae: number oF. ‘records witl be read. ‘to Fit 


the butter requested Cthirga operand). 


36 The. cassette will not. be stopred in ‘the widdte of a2" 


_ record. 


se gaesnece recors Congas saute oe entiates of 16 


gate the. size of the buffer is not a euteipts of 16 ana. 


be 16 NU. HASH. TOTAL epetiaue. was) requested, Caer 


a HASH.TOTAL checking was requested» | then a bade hee 


CO), aetcene will be — 


Lee C1)- wie be returned. oe 


| | g-i51- 
“BURROUGHS CORPORATION | COMPANY CONFIDENTIAL | 


COMPUTER SYSTEMS GROUP Ce -pia00s817¢0° SOL S“LANGUAGE 


S4NT4 BARBARA PLANT | ee —— PeSe #2261 2389 CL) 


PARITY ADDRESS 


Kkke¥k ka KK 


® PADK « 


kik kh kkk k a 


Syntax: PADK 
Format: — 


kkk chk hkhhkh kee 
* LLLd Ll OL) « 
PET eeRerececeeelacs se 


cP-Code 
Function: | 


ae Starting at absolute adaress zero (9)0 S*Memory 15 
scanned until MAXS is reached. | | 


b. If a parity error is detected» the error is corrected and 
| its location is placed on top of the EVALUATION STACK as 
a selfrrelative 24 bit cata items The address. returnec. 
points to the beginnine cf the byte of 3” moROry In which 
the parity error occurred. | | 


c» If no error is detected» a value of aFFFFFF Aa is piace? on 
the EVALUATION STACK. | 


NOTE: For MCP use only. 


Sea awegeue>s CORPORATION 


COMPUTER SYSTEMS GROUP eg ete “grecossir03. 


SAAT AL BARBARA PLANT. Pee Orne. PB 


PRU ILE 


Syntax. 


PRFL <Profile Array Index> 


Format: 


- Kkkk& kkk kh & & tkeeehee & & 


# TLEL 10 LAL ® 


kkt atk kkhkek hk keke kek 


CP-Code * | 


th k 12 Bits» specifies index. 


Function: — — 


DISPL4Y€16) contains the base | ek getnGe 


profile array. This” carfay. is between. 
DISPLAY and the base of the CONTROL STACK. 
| of the aera is 16 bits. 


The. entey nlebee given by <profile array 


, BunESS by one. 


COMPANY CONFIDENTIAL 
SDL S-LANGUAGE 


(W220 2389 “LY: 


eee 


es PREL #.° | 


fete ie he fete ee 


address of the 
the limit of 


Each element | 


index>» is 


3-153 


“BURROUGHS CORPORATION = = ©. COWPANY CONFIDENTIAL 


COMPUTER SYSTEMS GROUP | = “BLecGsal Tae SUL S*LANGUAGE | 
SANTA BARBARA PLANT 2 2 2 2 2 2 2 2 2 2 — iP eSs #2201 2389 CLD 
REINSTATE 


kkekkk kk | 
«© RETIN * 


kKktkik&knkkk 
Syntax: REIN 
Format: 


PTrTectcrce rT ee. 7 
 * 1111 10 OGOL * 


kKkk&khk&he hk khikk& ka kt 


OP-Code 
Function: 


ae «=6dTThe )6cddescriptor) 6 on the) top of the EVALUATIUN STACK is | 
} | assumed to describe the &S.CUMMUNICATE.MSE.PTR or | 
| - RS.NUCLEUS of the program to. be reinstated. (Refer to. 

the MCP manual for a gosce vee Lon: a aorun structures) 


pb. This. descriptor should have the name-vatue Bikcotes.. 


ee “The reinstating program's S*machine state is stored in 
the appropriate parts of its RS. NUCLEUS. 


Ce The address of the Pelneravina spodraete: RS « NUCLEUS 1s 
stored in the reinstated program*s RS.COMMUNICATE.LR. 


Ge. The address field of Ene. descripron on ehie: EVALUATION | 
STACK contains the address of the RS.NUCLEUS of the 
program that is instated when the descriptor is removed. 
| eae the EVALUATION a | = 


— gurrcueHs c CORPORATION. ee 
= COMPUTER SYSTEMS GkOUP 
a, SUE, BARBARA PLANT 


the 


SAVE STATE | 


“Syntax: SVST 


Format: | 


Teer Cicer r 222) ee 
—*& L111 16 O90L © 
ahh kek hk hh kkk 


ae Code 
Nasnia 


current state. ne he: S- wachne: 


Peter to the 
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